diff --git a/lib/mskrtd.f90 b/lib/mskrtd.f90 index bd3f8a5fd..27d520434 100644 --- a/lib/mskrtd.f90 +++ b/lib/mskrtd.f90 @@ -82,7 +82,7 @@ subroutine mskrtd(id2,nutc0,tsec,ntol,line) call analytic(d,NZ,NFFT1,cdat) !Convert to analytic signal and filter nmessages=0 - line=' ' + line=char(0) nshort=0 npts=7168 nsnr=-4 !### Temporary ###