gamit 编译 setup.f 错误

Running unimake to create Makefile for model
System name:  Linux linux-cvw0 2.6.37.1-1.2-default #1 SMP 2011-02-21 10:34:10 +0100 i686 i686 i386 GNU/Linux
System release number translated to  2637
No i86 compiler specification--assuming gfortran (gcc 4.2x)
No need to rebuild Makefile for model, SKIP
gfortran -c -O3 -Wuninitialized -fno-f2c -ffast-math -fno-automatic -fno-backslash mversn.f
ar rv model_lib.a *.o
r - mversn.o
rm -f mversn.o
gfortran -c -O3 -Wuninitialized -fno-f2c -ffast-math -fno-automatic -fno-backslash setup.f
setup.f:578.57:


     .   ,'Standard code: ',antcod,'  Full name: ',anttyp(1:15)         
                                                         1
Error: Syntax error in WRITE statement at (1)
setup.f:808.16:


      if(yfiln(1:5).eq.'     ')then                                     
                1
Error: Syntax error in argument list at (1)
setup.f:810.72:


      else                                                              
                                                                        1
Error: Unexpected ELSE statement at (1)
setup.f:812.9:


      endif                                                             
         1
Error: Expecting END SUBROUTINE statement at (1)
setup.f:817.16:


      if(yfiln(1:5).eq.'     ')then                                     
                1
Error: Syntax error in argument list at (1)
setup.f:819.72:


      else                                                              
                                                                        1
Error: Unexpected ELSE statement at (1)
setup.f:821.9:


      endif                                                             
         1
Error: Expecting END SUBROUTINE statement at (1)
setup.f:850.16:


        if(yfiln(6:6).ne.'t') call report_stat('WARNING','MODEL','setup'
                1
Error: Syntax error in IF-expression at (1)
setup.f:1028.34:


     .               , lapse,e0,ah,aw,undu,gpt_filnam)                  
                                  1
Error: Symbol 'ah' at (1) has no IMPLICIT type
setup.f:393.40:


      call read_rcvant(1,1,antcod,anttyp,radome_in,rcvcod,rcvtyp,pcncod)
                                        1
Error: Symbol 'anttyp' at (1) has no IMPLICIT type
setup.f:1028.37:


     .               , lapse,e0,ah,aw,undu,gpt_filnam)                  
                                     1
Error: Symbol 'aw' at (1) has no IMPLICIT type
setup.f:1028.28:


     .               , lapse,e0,ah,aw,undu,gpt_filnam)                  
                            1
Error: Symbol 'lapse' at (1) has no IMPLICIT type
setup.f:831.15:


      if (yfiln.eq.'          ') then                                   
               1
Error: Symbol 'yfiln' at (1) has no IMPLICIT type
make: *** [model_lib.a(setup.o)] 错误 1
Failure in make_gamit -- install_software terminated
zhao@linux-cvw0:~/programs/gamit104>