| File |
Line number |
Procedure |
Code |
|
./eesupp/src/dfile.F |
323 |
DFILE_READ_R4 |
INTEGER ioUnit |
|
./eesupp/src/dfile.F |
336 |
DFILE_READ_R4 |
ioUnit = dUnitNumber(fileHandle,myThid) |
|
./eesupp/src/dfile.F |
337 |
DFILE_READ_R4 |
READ(ioUnit,ERR=899) (ioBuf_R4(I),I=1,lBuffer) |
|
./eesupp/src/dfile.F |
407 |
DFILE_READ_R8 |
INTEGER ioUnit |
|
./eesupp/src/dfile.F |
420 |
DFILE_READ_R8 |
ioUnit = dUnitNumber(fileHandle,myThid) |
|
./eesupp/src/dfile.F |
421 |
DFILE_READ_R8 |
READ(ioUnit,ERR=899) (ioBuf_R8(I),I=1,lBuffer) |
|
./eesupp/src/dfile.F |
564 |
DFILE_WRITE_R4 |
INTEGER ioUnit |
|
./eesupp/src/dfile.F |
577 |
DFILE_WRITE_R4 |
ioUnit = dUnitNumber(fileHandle,myThid) |
|
./eesupp/src/dfile.F |
579 |
DFILE_WRITE_R4 |
WRITE(ioUnit,ERR=899) (ioBuf_R4(I),I=1,lBuffer) |
|
./eesupp/src/dfile.F |
584 |
DFILE_WRITE_R4 |
ioUnit = mUnitNumber(fileHandle,myThid) |
|
./eesupp/src/dfile.F |
587 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
590 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
592 |
DFILE_WRITE_R4 |
& ioUnit ) |
|
./eesupp/src/dfile.F |
594 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
597 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
599 |
DFILE_WRITE_R4 |
& ioUnit ) |
|
./eesupp/src/dfile.F |
601 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
605 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
608 |
DFILE_WRITE_R4 |
& I.NE.nDims, .FALSE., ioUnit ) |
|
./eesupp/src/dfile.F |
611 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
614 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
616 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
618 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
621 |
DFILE_WRITE_R4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
698 |
DFILE_WRITE_R8 |
INTEGER ioUnit |
|
./eesupp/src/dfile.F |
711 |
DFILE_WRITE_R8 |
ioUnit = dUnitNumber(fileHandle,myThid) |
|
./eesupp/src/dfile.F |
713 |
DFILE_WRITE_R8 |
WRITE(ioUnit,ERR=899) (ioBuf_R8(I),I=1,lBuffer) |
|
./eesupp/src/dfile.F |
718 |
DFILE_WRITE_R8 |
ioUnit = mUnitNumber(fileHandle,myThid) |
|
./eesupp/src/dfile.F |
721 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
724 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
726 |
DFILE_WRITE_R8 |
& ioUnit ) |
|
./eesupp/src/dfile.F |
728 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
731 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
733 |
DFILE_WRITE_R8 |
& ioUnit ) |
|
./eesupp/src/dfile.F |
735 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
739 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
742 |
DFILE_WRITE_R8 |
& I.NE.nDims, .FALSE., ioUnit ) |
|
./eesupp/src/dfile.F |
745 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
748 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
750 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
752 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/dfile.F |
755 |
DFILE_WRITE_R8 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./pkg/diagnostics/diagnostics_out.F |
111 |
DIAGNOSTICS_OUT |
ioUnit= standardMessageUnit |
|
./pkg/diagnostics/diagnostics_out.F |
254 |
DIAGNOSTICS_OUT |
IF ( myThid.EQ.1 ) WRITE(ioUnit,'(A,I3,3A,I8,2A)') |
|
./pkg/diagnostics/diagnostics_out.F |
263 |
DIAGNOSTICS_OUT |
IF ( myThid.EQ.1 ) WRITE(ioUnit,'(3A,I3,2A)') |
|
./pkg/diagnostics/diagnostics_out.F |
276 |
DIAGNOSTICS_OUT |
IF ( myThid.EQ.1 ) WRITE(ioUnit,'(3A,I3,3A)') |
|
./pkg/diagnostics/diagnostics_out.F |
281 |
DIAGNOSTICS_OUT |
IF ( myThid.EQ.1 ) WRITE(ioUnit,'(3A,I3,3A)') |
|
./pkg/diagnostics/diagnostics_out.F |
90 |
DIAGNOSTICS_OUT |
INTEGER ioUnit |
|
./pkg/diagnostics/diagstats_output.F |
114 |
DIAGSTATS_OUTPUT |
WRITE(ioUnit,'(A,I3,3A,I3,A,1PE10.3,2A)') |
|
./pkg/diagnostics/diagstats_output.F |
118 |
DIAGSTATS_OUTPUT |
WRITE(ioUnit,'(A,I3,3A,I3,2(A,1PE10.3))') |
|
./pkg/diagnostics/diagstats_output.F |
56 |
DIAGSTATS_OUTPUT |
INTEGER ioUnit |
|
./pkg/diagnostics/diagstats_output.F |
61 |
DIAGSTATS_OUTPUT |
ioUnit= standardMessageUnit |
|
./eesupp/src/print.F |
141 |
PRINT_LIST_I |
& markEnd, compact, ioUnit ) |
|
./eesupp/src/print.F |
177 |
PRINT_LIST_I |
INTEGER ioUnit |
|
./eesupp/src/print.F |
230 |
PRINT_LIST_I |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
252 |
PRINT_LIST_I |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
262 |
PRINT_LIST_L |
& compact, ioUnit ) |
|
./eesupp/src/print.F |
298 |
PRINT_LIST_L |
INTEGER ioUnit |
|
./eesupp/src/print.F |
351 |
PRINT_LIST_L |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
373 |
PRINT_LIST_L |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
382 |
PRINT_LIST_R8 |
& markEnd, compact, ioUnit ) |
|
./eesupp/src/print.F |
418 |
PRINT_LIST_R8 |
INTEGER ioUnit |