Symbol Description Uses
Thetfile 5



File Line number Procedure Code
./pkg/offline/offline_fields_load.F 189 OFFLINE_FIELDS_LOAD
       IF ( Thetfile .NE. ' '  ) THEN
./pkg/offline/offline_fields_load.F 190 OFFLINE_FIELDS_LOAD
        I1=IFNBLNK(Thetfile)
./pkg/offline/offline_fields_load.F 191 OFFLINE_FIELDS_LOAD
        I2=ILNBLNK(Thetfile)
./pkg/offline/offline_fields_load.F 192 OFFLINE_FIELDS_LOAD
        WRITE(fn,'(A,A,I10.10)') Thetfile(I1:I2),'.',
./pkg/offline/offline_fields_load.F 195 OFFLINE_FIELDS_LOAD
        WRITE(fn,'(A,A,I10.10)') Thetfile(I1:I2),'.',