Symbol Description Uses
iEnd Temps. for string indexing 156


File Line number Procedure Code
./pkg/seaice/seaice_get_forcing.F 139 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( uwindFile ) - 2
./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 145 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( vwindFile ) - 2
./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 153 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( atempFile ) - 4
./pkg/seaice/seaice_get_forcing.F 154 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') atempFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 159 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( aqhFile ) - 4
./pkg/seaice/seaice_get_forcing.F 160 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') aqhFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 165 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( lwdownFile ) - 4
./pkg/seaice/seaice_get_forcing.F 166 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') lwdownFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 171 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( swdownFile ) - 4
./pkg/seaice/seaice_get_forcing.F 172 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') swdownFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 177 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( precipFile ) - 4
./pkg/seaice/seaice_get_forcing.F 178 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') precipFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 183 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( evapFile ) - 4
./pkg/seaice/seaice_get_forcing.F 184 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') evapFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 189 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( runoffFile ) - 4
./pkg/seaice/seaice_get_forcing.F 190 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') runoffFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 197 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( thetaClimFile ) - 2
./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 244 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( uwindFile ) - 2
./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 253 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( vwindFile ) - 2
./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 281 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( atempFile ) - 4
./pkg/seaice/seaice_get_forcing.F 282 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') atempFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 290 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( aqhFile ) - 4
./pkg/seaice/seaice_get_forcing.F 291 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') aqhFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 299 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( lwdownFile ) - 4
./pkg/seaice/seaice_get_forcing.F 300 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') lwdownFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 308 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( swdownFile ) - 4
./pkg/seaice/seaice_get_forcing.F 309 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') swdownFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 317 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( precipFile ) - 4
./pkg/seaice/seaice_get_forcing.F 318 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') precipFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 326 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( evapFile ) - 4
./pkg/seaice/seaice_get_forcing.F 327 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') evapFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 335 SEAICE_GET_FORCING 
        iEnd = ILNBLNK( runoffFile ) - 4
./pkg/seaice/seaice_get_forcing.F 336 SEAICE_GET_FORCING 
        WRITE(fName,'(A,I4.4)') runoffFile(1:iEnd), CurrentYear
./pkg/seaice/seaice_get_forcing.F 373 SEAICE_GET_FORCING 
       iEnd = ILNBLNK( thetaClimFile ) - 2
./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 46 SEAICE_GET_FORCING 
      INTEGER bi,bj,i,j,iRec,iEnd