diff --git a/lib/msk144d2.f90 b/lib/msk144d2.f90 index f6eec1d7f..51d974658 100644 --- a/lib/msk144d2.f90 +++ b/lib/msk144d2.f90 @@ -94,7 +94,7 @@ program msk144d2 do i=1,npts-7*1024+1,7*512 ichunk=id2(i:i+7*1024-1) tsec=(i-1)/12000.0 - call mskrtd(ichunk,nutc,tsec,ntol,nrxfreq,ndepth,line) + call mskrtd(ichunk,nutc,tsec,ntol,nrxfreq,ndepth,mycall,hiscall,bShMsgs,line) if( index(line,"^") .ne. 0 .or. index(line,"&") .ne. 0 ) then write(*,*) line endif