Symbol Description Uses
CurrentYear2 9



File Line number Procedure Code
./pkg/seaice/seaice_get_forcing.F 140 SEAICE_GET_FORCING
        WRITE(fName,'(A,I2.2)') uwindFile(1:iEnd), CurrentYear2
./pkg/seaice/seaice_get_forcing.F 146 SEAICE_GET_FORCING
        WRITE(fName,'(A,I2.2)') vwindFile(1:iEnd), CurrentYear2
./pkg/seaice/seaice_get_forcing.F 198 SEAICE_GET_FORCING
        WRITE(fName,'(A,I2.2)') thetaClimFile(1:iEnd), CurrentYear2
./pkg/seaice/seaice_get_forcing.F 245 SEAICE_GET_FORCING
        WRITE(fName,'(A,I2.2)') uwindFile(1:iEnd), CurrentYear2
./pkg/seaice/seaice_get_forcing.F 254 SEAICE_GET_FORCING
        WRITE(fName,'(A,I2.2)') vwindFile(1:iEnd), CurrentYear2
./pkg/seaice/seaice_get_forcing.F 374 SEAICE_GET_FORCING
       WRITE(fName,'(A,I2.2)') thetaClimFile(1:iEnd), CurrentYear2
./pkg/seaice/seaice_get_forcing.F 51 SEAICE_GET_FORCING
      INTEGER CurrentYear, CurrentYear2
./pkg/seaice/seaice_get_forcing.F 75 SEAICE_GET_FORCING
         CurrentYear2 = CurrentYear-2000
./pkg/seaice/seaice_get_forcing.F 77 SEAICE_GET_FORCING
         CurrentYear2 = CurrentYear-1900