Fix another grid variable length to suit new azdist API

2019-05-02 22:01:31 +01:00 · 2019-05-02 22:01:31 +01:00 · 45a1841eec
parent fd3fb106d4
commit 45a1841eec
1 changed files with 2 additions and 2 deletions
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@ -133,8 +133,8 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
                 n30fox(j)=n
                 m=n30max-n
                 if(len(trim(g2fox(j))).eq.4) then
-                    call azdist(mygrid,g2fox(j),0.d0,nAz,nEl,nDmiles,nDkm, &
-                         nHotAz,nHotABetter)
+                    call azdist(mygrid,g2fox(j)//'  ',0.d0,nAz,nEl,nDmiles,	&
+                         nDkm,nHotAz,nHotABetter)
                 else
                    nDkm=9999
                 endif