File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_exf.F |
150 |
THSICE_GET_EXF |
INTEGER stdUnit |
./pkg/thsice/thsice_get_exf.F |
169 |
THSICE_GET_EXF |
stdUnit = standardMessageUnit |
./pkg/thsice/thsice_get_exf.F |
218 |
THSICE_GET_EXF |
IF ( dBug(i,j,bi,bj) .AND. iceFlag(i,j) ) WRITE(stdUnit, |
./pkg/thsice/thsice_get_exf.F |
436 |
THSICE_GET_EXF |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,'(A,4F12.6)') |
./pkg/thsice/thsice_get_exf.F |
450 |
THSICE_GET_EXF |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,'(A,4F12.6)') |
./pkg/thsice/thsice_solve4temp.F |
146 |
THSICE_SOLVE4TEMP |
INTEGER ii, jj, icount, stdUnit |
./pkg/thsice/thsice_solve4temp.F |
205 |
THSICE_SOLVE4TEMP |
stdUnit = standardMessageUnit |
./pkg/thsice/thsice_solve4temp.F |
239 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,'(A,2I4,2I2)') |
./pkg/thsice/thsice_solve4temp.F |
288 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,I12,1PE14.6)') |
./pkg/thsice/thsice_solve4temp.F |
290 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,4I5,2F11.4)') |
./pkg/thsice/thsice_solve4temp.F |
294 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,I12,1PE14.6)') |
./pkg/thsice/thsice_solve4temp.F |
296 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,4I5,2F11.4)') |
./pkg/thsice/thsice_solve4temp.F |
299 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,1010) |
./pkg/thsice/thsice_solve4temp.F |
323 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,I5,A)') |
./pkg/thsice/thsice_solve4temp.F |
326 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,I3,A1,I3,A)') |
./pkg/thsice/thsice_solve4temp.F |
446 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,1020) |
./pkg/thsice/thsice_solve4temp.F |
461 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,1010) |
./pkg/thsice/thsice_solve4temp.F |
490 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,1010) |
./pkg/thsice/thsice_solve4temp.F |
493 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,4I4,I12,F15.9)') |
./pkg/thsice/thsice_solve4temp.F |
495 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,*) |
./pkg/thsice/thsice_solve4temp.F |
497 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,*) |
./pkg/thsice/thsice_solve4temp.F |
530 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,1010) |
./pkg/thsice/thsice_solve4temp.F |
556 |
THSICE_SOLVE4TEMP |
IF ( dBug(i,j,bi,bj) ) WRITE(stdUnit,1020) |
./pkg/thsice/thsice_solve4temp.F |
570 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,2I4,2I3,1P2E14.6)') |
./pkg/thsice/thsice_solve4temp.F |
574 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,'(A,2I4,2I3,1P2E14.6)') |
./pkg/thsice/thsice_solve4temp.F |
579 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,1020) 'ThSI_SOLV_4T: Tsf, Tice(1,2), dTsurf=', |
./pkg/thsice/thsice_solve4temp.F |
581 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,1020) 'ThSI_SOLV_4T: sHeat, flxCndBt, Qice =', |
./pkg/thsice/thsice_solve4temp.F |
583 |
THSICE_SOLVE4TEMP |
WRITE(stdUnit,1020) 'ThSI_SOLV_4T: flxA, evpA, fxSW_bf,af=', |
./model/src/set_ref_state.F |
304 |
SET_REF_STATE |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./model/src/set_ref_state.F |
307 |
SET_REF_STATE |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./model/src/set_ref_state.F |
310 |
SET_REF_STATE |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./model/src/set_ref_state.F |
315 |
SET_REF_STATE |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./model/src/set_ref_state.F |
41 |
SET_REF_STATE |
INTEGER k, ks, stdUnit |
./model/src/set_ref_state.F |
54 |
SET_REF_STATE |
stdUnit = standardMessageUnit |
./pkg/diagnostics/diagnostics_readparms.F |
457 |
DIAGNOSTICS_READPARMS |
stdUnit = standardMessageUnit |
./pkg/diagnostics/diagnostics_readparms.F |
460 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
463 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
466 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
469 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
472 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
476 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
487 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
490 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
493 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
498 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
506 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
512 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
517 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
520 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
524 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
527 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
536 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
541 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
546 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
548 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_readparms.F |
75 |
DIAGNOSTICS_READPARMS |
INTEGER ku, stdUnit |
./pkg/diagnostics/diagnostics_set_levels.F |
164 |
DIAGNOSTICS_SET_LEVELS |
stdUnit = standardMessageUnit |
./pkg/diagnostics/diagnostics_set_levels.F |
167 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_set_levels.F |
169 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_set_levels.F |
172 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_set_levels.F |
181 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_set_levels.F |
65 |
DIAGNOSTICS_SET_LEVELS |
INTEGER dUnit, stdUnit |
./pkg/diagnostics/diagnostics_setdiag.F |
147 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_setdiag.F |
153 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_setdiag.F |
48 |
DIAGNOSTICS_SETDIAG |
INTEGER stdUnit, errUnit |
./pkg/diagnostics/diagnostics_setdiag.F |
61 |
DIAGNOSTICS_SETDIAG |
stdUnit = standardMessageUnit |
./pkg/diagnostics/diagnostics_setdiag.F |
98 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_summary.F |
35 |
DIAGNOSTICS_SUMMARY |
INTEGER dUnit, stdUnit, iLen |
./pkg/diagnostics/diagnostics_summary.F |
46 |
DIAGNOSTICS_SUMMARY |
stdUnit = standardMessageUnit |
./pkg/diagnostics/diagnostics_summary.F |
56 |
DIAGNOSTICS_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagnostics_summary.F |
66 |
DIAGNOSTICS_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagstats_setdiag.F |
137 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagstats_setdiag.F |
145 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
./pkg/diagnostics/diagstats_setdiag.F |
48 |
DIAGSTATS_SETDIAG |
INTEGER stdUnit, errUnit |
./pkg/diagnostics/diagstats_setdiag.F |
61 |
DIAGSTATS_SETDIAG |
stdUnit = standardMessageUnit |
./pkg/diagnostics/diagstats_setdiag.F |
92 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
./pkg/exch2/w2_e2setup.F |
42 |
W2_E2SETUP |
INTEGER stdUnit |
./pkg/exch2/w2_e2setup.F |
47 |
W2_E2SETUP |
stdUnit = standardMessageUnit |
./pkg/exch2/w2_eeboot.F |
101 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/exch2/w2_eeboot.F |
237 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/exch2/w2_eeboot.F |
239 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/exch2/w2_eeboot.F |
42 |
W2_EEBOOT |
INTEGER stdUnit, iLen |
./pkg/exch2/w2_eeboot.F |
88 |
W2_EEBOOT |
stdUnit = standardMessageUnit |
./pkg/exch2/w2_eeboot.F |
90 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/exch2/w2_readparms.F |
105 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
115 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
120 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
131 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
185 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
188 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
191 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/exch2/w2_readparms.F |
37 |
W2_READPARMS |
INTEGER i, j, iUnit, stdUnit, errCnt |
./pkg/exch2/w2_readparms.F |
63 |
W2_READPARMS |
stdUnit = standardMessageUnit |