| 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 |
141 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,uwind0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
142 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,uwind1,iRec+1,myIter,myThid ) |
|
./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 |
147 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
148 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind1,iRec+1,myIter,myThid ) |
|
./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 |
155 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,atemp0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
156 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,atemp1,iRec+1,myIter,myThid ) |
|
./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 |
161 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,aqh0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
162 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,aqh1,iRec+1,myIter,myThid ) |
|
./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 |
167 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,lwdown0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
168 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,lwdown1,iRec+1,myIter,myThid ) |
|
./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 |
173 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,swdown0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
174 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,swdown1,iRec+1,myIter,myThid ) |
|
./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 |
179 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,precip0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
180 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,precip1,iRec+1,myIter,myThid ) |
|
./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 |
185 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,evap0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
186 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,evap1,iRec+1,myIter,myThid ) |
|
./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 |
191 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,runoff0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
192 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,runoff1,iRec+1,myIter,myThid ) |
|
./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 |
199 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,SSTsi0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
200 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,SSTsi1,iRec+1,myIter,myThid ) |
|
./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 |
247 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,uwind0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
249 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,uwind1,iRec,myIter,myThid ) |
|
./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 |
256 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
258 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind1,iRec,myIter,myThid ) |
|
./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 |
284 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,atemp0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
286 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,atemp1,iRec,myIter,myThid ) |
|
./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 |
293 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,aqh0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
295 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,aqh1,iRec,myIter,myThid ) |
|
./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 |
302 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,lwdown0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
304 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,lwdown1,iRec,myIter,myThid ) |
|
./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 |
311 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,swdown0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
313 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,swdown1,iRec,myIter,myThid ) |
|
./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 |
320 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,precip0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
322 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,precip1,iRec,myIter,myThid ) |
|
./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 |
329 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,evap0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
331 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,evap1,iRec,myIter,myThid ) |
|
./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 |
338 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,runoff0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
340 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,runoff1,iRec,myIter,myThid ) |
|
./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 |
376 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,SSTsi0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
378 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,SSTsi1,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
53 |
SEAICE_GET_FORCING |
CHARACTER*(MAX_LEN_MBUF) fName |