Symbol Description Uses
numFract 9



File Line number Procedure Code
./pkg/thsice/thsice_diagnostics_init.F 114 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM PC', numFract, 'M1      '
./pkg/thsice/thsice_diagnostics_init.F 128 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM  C', numFract, 'M1      '
./pkg/thsice/thsice_diagnostics_init.F 47 THSICE_DIAGNOSTICS_INIT
      INTEGER       numFract, numThick
./pkg/thsice/thsice_diagnostics_init.F 59 THSICE_DIAGNOSTICS_INIT
        numFract  = diagNum
./pkg/thsice/thsice_diagnostics_init.F 64 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM PC', numFract, 'M1      '
./pkg/thsice/thsice_diagnostics_init.F 72 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM PC', numFract, 'M1      '
./pkg/thsice/thsice_diagnostics_init.F 79 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM  C', numFract, 'M1      '
./pkg/thsice/thsice_diagnostics_init.F 86 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM  C', numFract, 'M1      '
./pkg/thsice/thsice_diagnostics_init.F 93 THSICE_DIAGNOSTICS_INIT
        WRITE(diagCode,'(A,I3.3,A)') 'SM  C', numFract, 'M1      '