sh_upd_stnfo总是会出现如下WARNING

WARNING:220116:2117:14.0 MSTINF/htoglb/mstinf: Checking station.info entries for RINEX file bjfs0080.22o
WARNING:220116:2117:14.0 MSTINF/htoglb/mstinf: swver (       5.) from rcvers > 99., set to zero (Name bjfs0080.22)

原因如下：

第一个WARNING:纯粹是多余的，直接在源代码里面屏蔽就可以了;

      write(message,'(2a)')
     .   'Checking station.info entries for RINEX file ',rx_file(irxf)                                                                         
      call report_stat('STATUS','MSTINF','htoglb/mstinf',' '
     .                ,message,0)  
*     call report_stat('WARNING','MSTINF','htoglb/mstinf',' '
*    .                ,message,0)
第二个WARNING:是因为if语句写的不合理:

swver表示接收机硬件版本，gamit的./kf/htoglb/mstinf.f源代码中设置了，不能超过99.0

但是代码中if语句执行，默认输出这句错误信息：

*       but if the decimal number is too large for the station.info field width
*       (f5.2), set it to 0.0
        read(rcvers,'(f20.0)',iostat=ioerr ) swver
        if( swver.gt. 99.) swver = 0.0
        write(message,'(a,f9.0,a)')
     .     'swver (',swver,') from rcvers > 99., set to zero'
        call report_stat('WARNING','MSTINF','htoglb/mstinf'
     .                  ,fname(1:lenf),message,0)

改成：

*       but if the decimal number is too large for the station.info field width
*       (f5.2), set it to 0.0
        read(rcvers,'(f20.0)',iostat=ioerr ) swver
        if( swver.gt. 99.) then
          swver = 0.0
          write(message,'(a,f9.0,a)')
     .       'swver (',swver,') from rcvers > 99., set to zero'
          call report_stat('WARNING','MSTINF','htoglb/mstinf'
     .                  ,fname(1:lenf),message,0)
        endif

重新编译gamit即可