| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_interp_read.F |
135 |
EXF_INTERP_READ |
CALL MDSFINDUNIT( ioUnit, myThid ) |
|
./pkg/exf/exf_interp_read.F |
137 |
EXF_INTERP_READ |
OPEN( ioUnit, file=infile, status='old', access='direct', |
|
./pkg/exf/exf_interp_read.F |
141 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) buffer_r4 |
|
./pkg/exf/exf_interp_read.F |
143 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) (buffer_r4(i),i=1,nx_in*ny_in) |
|
./pkg/exf/exf_interp_read.F |
150 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) buffer_r8 |
|
./pkg/exf/exf_interp_read.F |
152 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) (buffer_r8(i),i=1,nx_in*ny_in) |
|
./pkg/exf/exf_interp_read.F |
158 |
EXF_INTERP_READ |
CLOSE( ioUnit ) |
|
./pkg/exf/exf_interp_read.F |
53 |
EXF_INTERP_READ |
INTEGER ioUnit, length_of_rec, IL |
|
./pkg/fizhi/getpwhere.F |
100 |
GETPWHERE |
WRITE(ioUnit,'(A)') '===== GETPWHERE: CHECK start =====' |
|
./pkg/fizhi/getpwhere.F |
101 |
GETPWHERE |
WRITE(ioUnit,'(4(A,I6),A)') ' Nr =', Nr, |
|
./pkg/fizhi/getpwhere.F |
105 |
GETPWHERE |
WRITE(ioUnit,'(10F10.4)') (pref(L),L=1,ntry) |
|
./pkg/fizhi/getpwhere.F |
147 |
GETPWHERE |
WRITE(ioUnit,'(1(A,I5),A)') ' Up-Bnd=', upperBnd, |
|
./pkg/fizhi/getpwhere.F |
149 |
GETPWHERE |
WRITE(ioUnit,'(10F10.4)') rF_pmid |
|
./pkg/fizhi/getpwhere.F |
151 |
GETPWHERE |
WRITE(ioUnit,'(A)') |
|
./pkg/fizhi/getpwhere.F |
181 |
GETPWHERE |
WRITE(ioUnit,'(3(A,I5),A)') ' dynlev=', dynlev, |
|
./pkg/fizhi/getpwhere.F |
184 |
GETPWHERE |
WRITE(ioUnit,'(10F10.4)') pressures |
|
./pkg/fizhi/getpwhere.F |
185 |
GETPWHERE |
WRITE(ioUnit,'(A)') 'pref(ntry:Nrphys):' |
|
./pkg/fizhi/getpwhere.F |
186 |
GETPWHERE |
WRITE(ioUnit,'(10F10.4)') (pref(L),L=ntry,Nrphys) |
|
./pkg/fizhi/getpwhere.F |
187 |
GETPWHERE |
WRITE(ioUnit,'(A)') 'levpressures:' |
|
./pkg/fizhi/getpwhere.F |
188 |
GETPWHERE |
WRITE(ioUnit,'(20I5)') levpressures |
|
./pkg/fizhi/getpwhere.F |
189 |
GETPWHERE |
WRITE(ioUnit,'(A)') '===== GETPWHERE: CHECK end =====' |
|
./pkg/fizhi/getpwhere.F |
46 |
GETPWHERE |
INTEGER ioUnit, upperBnd |
|
./pkg/fizhi/getpwhere.F |
99 |
GETPWHERE |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch2_recv_get_vec.F |
105 |
EXCH2_RECV_GET_VEC_RL |
write(ioUnit,'(A,5I5,I8)') 'qq2xW: ',myProcId,bi,bj, |
|
./pkg/flt/exch2_recv_get_vec.F |
113 |
EXCH2_RECV_GET_VEC_RL |
write(ioUnit,'(A,5I6)') 'RECV,1 :',myProcId,bi,bj |
|
./pkg/flt/exch2_recv_get_vec.F |
121 |
EXCH2_RECV_GET_VEC_RL |
write(ioUnit,'(A,5I6,I12)') 'RECV:',myProcId |
|
./pkg/flt/exch2_recv_get_vec.F |
65 |
EXCH2_RECV_GET_VEC_RL |
INTEGER ioUnit |
|
./pkg/flt/exch2_recv_get_vec.F |
81 |
EXCH2_RECV_GET_VEC_RL |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch2_recv_get_vec.F |
97 |
EXCH2_RECV_GET_VEC_RL |
write(ioUnit,'(A,5I6)') 'RECV,0 :',myProcId,bi,bj |
|
./pkg/flt/exch2_send_put_vec.F |
101 |
EXCH2_SEND_PUT_VEC_RL |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch2_send_put_vec.F |
139 |
EXCH2_SEND_PUT_VEC_RL |
write(ioUnit,'(A,5I5,I8)') 'qq1xW: ',myProcId,bi,bj, |
|
./pkg/flt/exch2_send_put_vec.F |
73 |
EXCH2_SEND_PUT_VEC_RL |
INTEGER ioUnit |
|
./pkg/flt/exch_recv_get_vec.F |
104 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I5,I8)') 'qq2xW: ',myProcId,bi,bj, |
|
./pkg/flt/exch_recv_get_vec.F |
123 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I6)') 'RECV_X,1 :',myProcId,bi,bj |
|
./pkg/flt/exch_recv_get_vec.F |
134 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I5,I8)') 'qq2xE: ',myProcId,bi,bj, |
|
./pkg/flt/exch_recv_get_vec.F |
144 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I6)') 'RECV_X,2 :',myProcId,bi,bj |
|
./pkg/flt/exch_recv_get_vec.F |
149 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I6,I12)') 'RECV_X:',myProcId |
|
./pkg/flt/exch_recv_get_vec.F |
190 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj, |
|
./pkg/flt/exch_recv_get_vec.F |
197 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj, |
|
./pkg/flt/exch_recv_get_vec.F |
266 |
EXCH_RECV_GET_VEC_Y_RL |
INTEGER ioUnit |
|
./pkg/flt/exch_recv_get_vec.F |
285 |
EXCH_RECV_GET_VEC_Y_RL |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch_recv_get_vec.F |
294 |
EXCH_RECV_GET_VEC_Y_RL |
write(ioUnit,'(A,5I6)') 'RECV_Y,0 :',myProcId,bi,bj |
|
./pkg/flt/exch_recv_get_vec.F |
314 |
EXCH_RECV_GET_VEC_Y_RL |
write(ioUnit,'(A,5I6)') 'RECV_Y,1 :',myProcId,bi,bj |
|
./pkg/flt/exch_recv_get_vec.F |
331 |
EXCH_RECV_GET_VEC_Y_RL |
write(ioUnit,'(A,5I6)') 'RECV_Y,2 :',myProcId,bi,bj |
|
./pkg/flt/exch_recv_get_vec.F |
336 |
EXCH_RECV_GET_VEC_Y_RL |
write(ioUnit,'(A,5I6,I12)') 'RECV_Y:',myProcId |
|
./pkg/flt/exch_recv_get_vec.F |
378 |
EXCH_RECV_GET_VEC_Y_RL |
write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj, |
|
./pkg/flt/exch_recv_get_vec.F |
385 |
EXCH_RECV_GET_VEC_Y_RL |
write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj, |
|
./pkg/flt/exch_recv_get_vec.F |
62 |
EXCH_RECV_GET_VEC_X_RL |
INTEGER ioUnit |
|
./pkg/flt/exch_recv_get_vec.F |
81 |
EXCH_RECV_GET_VEC_X_RL |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch_recv_get_vec.F |
90 |
EXCH_RECV_GET_VEC_X_RL |
write(ioUnit,'(A,5I6)') 'RECV_X,0 :',myProcId,bi,bj |
|
./pkg/flt/exch_send_put_vec.F |
103 |
EXCH_SEND_PUT_VEC_X_RL |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch_send_put_vec.F |
104 |
EXCH_SEND_PUT_VEC_X_RL |
WRITE(ioUnit,'(A,2L5)') |
|
./pkg/flt/exch_send_put_vec.F |
130 |
EXCH_SEND_PUT_VEC_X_RL |
write(ioUnit,'(A,7I5,I8)') 'qq1xW: ',myProcId,bi,bj, |
|
./pkg/flt/exch_send_put_vec.F |
163 |
EXCH_SEND_PUT_VEC_X_RL |
write(ioUnit,'(A,7I5,I8)') 'qq1xE: ',myProcId,bi,bj, |
|
./pkg/flt/exch_send_put_vec.F |
297 |
EXCH_SEND_PUT_VEC_Y_RL |
INTEGER ioUnit |
|
./pkg/flt/exch_send_put_vec.F |
328 |
EXCH_SEND_PUT_VEC_Y_RL |
ioUnit = errorMessageUnit |
|
./pkg/flt/exch_send_put_vec.F |
72 |
EXCH_SEND_PUT_VEC_X_RL |
INTEGER ioUnit |
|
./pkg/flt/flt_init_varia.F |
110 |
FLT_INIT_VARIA |
ioUnit = -2 |
|
./pkg/flt/flt_init_varia.F |
115 |
FLT_INIT_VARIA |
CALL MDS_READVEC_LOC( fn, fp, ioUnit, |
|
./pkg/flt/flt_init_varia.F |
120 |
FLT_INIT_VARIA |
IF ( ioUnit.GT.0 .AND. mapIniPos2Index ) THEN |
|
./pkg/flt/flt_init_varia.F |
130 |
FLT_INIT_VARIA |
CALL MDS_READVEC_LOC( fn, fp, ioUnit, |
|
./pkg/flt/flt_init_varia.F |
162 |
FLT_INIT_VARIA |
CLOSE( ioUnit ) |
|
./pkg/flt/flt_init_varia.F |
164 |
FLT_INIT_VARIA |
ELSEIF ( ioUnit.GT.0 ) THEN |
|
./pkg/flt/flt_init_varia.F |
175 |
FLT_INIT_VARIA |
ioUnit = -1 |
|
./pkg/flt/flt_init_varia.F |
177 |
FLT_INIT_VARIA |
CALL MDS_READVEC_LOC( fn, fp, ioUnit, |
|
./pkg/flt/flt_init_varia.F |
190 |
FLT_INIT_VARIA |
CALL MDS_READVEC_LOC( fn, fp, ioUnit, |
|
./pkg/flt/flt_init_varia.F |
215 |
FLT_INIT_VARIA |
CLOSE( ioUnit ) |
|
./pkg/flt/flt_init_varia.F |
55 |
FLT_INIT_VARIA |
INTEGER fp, ioUnit |
|
./pkg/flt/flt_traj.F |
178 |
FLT_TRAJ |
ioUnit = -2 |
|
./pkg/flt/flt_traj.F |
179 |
FLT_TRAJ |
CALL MDS_READVEC_LOC( fn, fp, ioUnit, 'RL', nFlds, |
|
./pkg/flt/flt_traj.F |
182 |
FLT_TRAJ |
IF ( ioUnit.GT. 0 ) THEN |
|
./pkg/flt/flt_traj.F |
199 |
FLT_TRAJ |
CLOSE( ioUnit ) |
|
./pkg/flt/flt_traj.F |
226 |
FLT_TRAJ |
ioUnit = -1 |
|
./pkg/flt/flt_traj.F |
227 |
FLT_TRAJ |
CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds, |
|
./pkg/flt/flt_traj.F |
235 |
FLT_TRAJ |
CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds, |
|
./pkg/flt/flt_traj.F |
239 |
FLT_TRAJ |
CLOSE( ioUnit ) |
|
./pkg/flt/flt_traj.F |
57 |
FLT_TRAJ |
INTEGER fp, ioUnit, irecord |
|
./pkg/flt/flt_up.F |
176 |
FLT_UP |
ioUnit = -2 |
|
./pkg/flt/flt_up.F |
177 |
FLT_UP |
CALL MDS_READVEC_LOC( fn, fp, ioUnit, 'RL', nFlds, |
|
./pkg/flt/flt_up.F |
180 |
FLT_UP |
IF ( ioUnit.GT. 0 ) THEN |
|
./pkg/flt/flt_up.F |
197 |
FLT_UP |
CLOSE( ioUnit ) |
|
./pkg/flt/flt_up.F |
224 |
FLT_UP |
ioUnit = -1 |
|
./pkg/flt/flt_up.F |
225 |
FLT_UP |
CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds, |
|
./pkg/flt/flt_up.F |
233 |
FLT_UP |
CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds, |
|
./pkg/flt/flt_up.F |
237 |
FLT_UP |
CLOSE( ioUnit ) |
|
./pkg/flt/flt_up.F |
54 |
FLT_UP |
INTEGER fp, ioUnit, irecord |
|
./pkg/flt/flt_write_pickup.F |
43 |
FLT_WRITE_PICKUP |
INTEGER ioUnit, irecord |
|
./pkg/flt/flt_write_pickup.F |
74 |
FLT_WRITE_PICKUP |
ioUnit = -1 |
|
./pkg/flt/flt_write_pickup.F |
75 |
FLT_WRITE_PICKUP |
CALL MDS_WRITEVEC_LOC( fn, precFloat64, ioUnit, |
|
./pkg/flt/flt_write_pickup.F |
94 |
FLT_WRITE_PICKUP |
CALL MDS_WRITEVEC_LOC( fn, precFloat64, ioUnit, |
|
./pkg/flt/flt_write_pickup.F |
99 |
FLT_WRITE_PICKUP |
CLOSE( ioUnit ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
104 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
109 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
150 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
155 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
43 |
GAD_READ_PICKUP |
INTEGER ioUnit |
|
./pkg/generic_advdiff/gad_read_pickup.F |
50 |
GAD_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/gmredi/gmredi_read_pickup.F |
104 |
GMREDI_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
214 |
GMREDI_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/gmredi/gmredi_read_pickup.F |
46 |
GMREDI_READ_PICKUP |
INTEGER i,j,k,n,nm,ioUnit,bi,bj |
|
./pkg/gmredi/gmredi_read_pickup.F |
84 |
GMREDI_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/gmredi/gmredi_read_pickup.F |
93 |
GMREDI_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
99 |
GMREDI_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
104 |
GRDCHK_MAIN |
INTEGER ioUnit |
|
./pkg/grdchk/grdchk_main.F |
137 |
GRDCHK_MAIN |
ioUnit = standardMessageUnit |
|
./pkg/grdchk/grdchk_main.F |
140 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
142 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
145 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
175 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
227 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
256 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
347 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
386 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
475 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
478 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
481 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
485 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
488 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
491 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
497 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
129 |
MDS_CHECK4FILE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
131 |
MDS_CHECK4FILE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
55 |
MDS_CHECK4FILE |
INTEGER lp, ip, is, iL, i, ioUnit |
|
./pkg/mdsio/mdsio_check4file.F |
58 |
MDS_CHECK4FILE |
ioUnit = errorMessageUnit |
|
./pkg/mdsio/mdsio_readvec_loc.F |
123 |
MDS_READVEC_LOC |
IF ( ioUnit.GT.0 ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
126 |
MDS_READVEC_LOC |
dUnit = ioUnit |
|
./pkg/mdsio/mdsio_readvec_loc.F |
127 |
MDS_READVEC_LOC |
ELSEIF ( ioUnit.GE.-2 ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
12 |
MDS_READVEC_LOC |
U ioUnit, |
|
./pkg/mdsio/mdsio_readvec_loc.F |
189 |
MDS_READVEC_LOC |
IF ( ioUnit.GE.-1 ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
199 |
MDS_READVEC_LOC |
& ioUnit, ' = invalid value for ioUnit argument' |
|
./pkg/mdsio/mdsio_readvec_loc.F |
223 |
MDS_READVEC_LOC |
IF ( ioUnit.EQ.-2 .OR. ioUnit.EQ.-1 ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
224 |
MDS_READVEC_LOC |
ioUnit = dUnit |
|
./pkg/mdsio/mdsio_readvec_loc.F |
225 |
MDS_READVEC_LOC |
ELSEIF ( ioUnit.EQ.0 ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
61 |
MDS_READVEC_LOC |
INTEGER ioUnit |
|
./pkg/mdsio/mdsio_writevec_loc.F |
12 |
MDS_WRITEVEC_LOC |
U ioUnit, |
|
./pkg/mdsio/mdsio_writevec_loc.F |
145 |
MDS_WRITEVEC_LOC |
IF ( ioUnit.GT.0 ) THEN |
|
./pkg/mdsio/mdsio_writevec_loc.F |
148 |
MDS_WRITEVEC_LOC |
dUnit = ioUnit |
|
./pkg/mdsio/mdsio_writevec_loc.F |
208 |
MDS_WRITEVEC_LOC |
IF ( fileIsOpen .AND. ioUnit.EQ.0 ) THEN |
|
./pkg/mdsio/mdsio_writevec_loc.F |
212 |
MDS_WRITEVEC_LOC |
IF ( ioUnit.EQ.-1 ) ioUnit = dUnit |
|
./pkg/mdsio/mdsio_writevec_loc.F |
62 |
MDS_WRITEVEC_LOC |
INTEGER ioUnit |
|
./pkg/mypackage/mypackage_read_pickup.F |
103 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
166 |
MYPACKAGE_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/mypackage/mypackage_read_pickup.F |
47 |
MYPACKAGE_READ_PICKUP |
INTEGER j, nj, ioUnit |
|
./pkg/mypackage/mypackage_read_pickup.F |
83 |
MYPACKAGE_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/mypackage/mypackage_read_pickup.F |
92 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
98 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
100 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
113 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
123 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
129 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
136 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
143 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
212 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
220 |
CHECK_PICKUP |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
224 |
CHECK_PICKUP |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
50 |
CHECK_PICKUP |
INTEGER ioUnit |
|
./model/src/check_pickup.F |
55 |
CHECK_PICKUP |
ioUnit = errorMessageUnit |
|
./model/src/check_pickup.F |
73 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
91 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
102 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
104 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
258 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
340 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
343 |
CONFIG_SUMMARY |
& .FALSE., .TRUE., ioUnit ) |
|
./model/src/config_summary.F |
346 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
347 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
416 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
419 |
CONFIG_SUMMARY |
& .FALSE., .TRUE., ioUnit ) |
|
./model/src/config_summary.F |
422 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
423 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
442 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
445 |
CONFIG_SUMMARY |
& .FALSE., .TRUE., ioUnit ) |
|
./model/src/config_summary.F |
448 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
450 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
453 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
456 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
459 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
465 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
554 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
557 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
560 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
563 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
566 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
569 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
572 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
577 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
580 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
582 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
604 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
607 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
609 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
66 |
CONFIG_SUMMARY |
INTEGER ioUnit |
|
./model/src/config_summary.F |
717 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
720 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
722 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
77 |
CONFIG_SUMMARY |
ioUnit = standardMessageUnit |
|
./model/src/config_summary.F |
884 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
886 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
889 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
891 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
91 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
93 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
96 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
99 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
111 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
113 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
115 |
OBCS_CHECK |
& .FALSE., .TRUE., ioUnit ) |
|
./pkg/obcs/obcs_check.F |
117 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
119 |
OBCS_CHECK |
& .FALSE., .TRUE., ioUnit ) |
|
./pkg/obcs/obcs_check.F |
121 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
123 |
OBCS_CHECK |
& .FALSE., .TRUE., ioUnit ) |
|
./pkg/obcs/obcs_check.F |
125 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
127 |
OBCS_CHECK |
& .FALSE., .TRUE., ioUnit ) |
|
./pkg/obcs/obcs_check.F |
133 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
217 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
255 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
437 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
48 |
OBCS_CHECK |
INTEGER ioUnit |
|
./pkg/obcs/obcs_check.F |
51 |
OBCS_CHECK |
ioUnit = standardMessageUnit |
|
./pkg/obcs/obcs_check.F |
565 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
59 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
62 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
166 |
OBCS_INIT_FIXED |
ioUnit = standardMessageUnit |
|
./pkg/obcs/obcs_init_fixed.F |
169 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
187 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
210 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
233 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
256 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
273 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
50 |
OBCS_INIT_FIXED |
INTEGER ioUnit |
|
./pkg/ptracers/ptracers_check_pickup.F |
102 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
107 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
135 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
49 |
PTRACERS_CHECK_PICKUP |
INTEGER ioUnit |
|
./pkg/ptracers/ptracers_check_pickup.F |
56 |
PTRACERS_CHECK_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/ptracers/ptracers_read_pickup.F |
132 |
PTRACERS_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/ptracers/ptracers_read_pickup.F |
141 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
146 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
151 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
156 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
159 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
285 |
PTRACERS_READ_PICKUP |
ioUnit = standardMessageUnit |
|
./pkg/ptracers/ptracers_read_pickup.F |
288 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
289 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( fn, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
313 |
PTRACERS_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/ptracers/ptracers_read_pickup.F |
318 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
323 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
54 |
PTRACERS_READ_PICKUP |
INTEGER nj, ioUnit |
|
./pkg/rw/read_glvec_rl.F |
41 |
READ_GLVEC_RL |
INTEGER ioUnit, bi, bj |
|
./pkg/rw/read_glvec_rl.F |
59 |
READ_GLVEC_RL |
ioUnit = 0 |
|
./pkg/rw/read_glvec_rl.F |
65 |
READ_GLVEC_RL |
& fullName, readBinaryPrec, ioUnit, |
|
./pkg/rw/read_glvec_rs.F |
41 |
READ_GLVEC_RS |
INTEGER ioUnit, bi, bj |
|
./pkg/rw/read_glvec_rs.F |
59 |
READ_GLVEC_RS |
ioUnit = 0 |
|
./pkg/rw/read_glvec_rs.F |
65 |
READ_GLVEC_RS |
& fullName, readBinaryPrec, ioUnit, |
|
./pkg/rw/read_mflds.F |
116 |
READ_MFLDS_SET |
INTEGER i, j, ioUnit |
|
./pkg/rw/read_mflds.F |
190 |
READ_MFLDS_SET |
ioUnit = standardMessageUnit |
|
./pkg/rw/read_mflds.F |
194 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
199 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
204 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
206 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
209 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
213 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
217 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
221 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
224 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
283 |
READ_MFLDS_3D_RL |
INTEGER j, iL, ioUnit |
|
./pkg/rw/read_mflds.F |
303 |
READ_MFLDS_3D_RL |
ioUnit = standardMessageUnit |
|
./pkg/rw/read_mflds.F |
323 |
READ_MFLDS_3D_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
332 |
READ_MFLDS_3D_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
341 |
READ_MFLDS_3D_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
412 |
READ_MFLDS_LEV_RL |
INTEGER j, iL, ioUnit |
|
./pkg/rw/read_mflds.F |
432 |
READ_MFLDS_LEV_RL |
ioUnit = standardMessageUnit |
|
./pkg/rw/read_mflds.F |
452 |
READ_MFLDS_LEV_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
461 |
READ_MFLDS_LEV_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
470 |
READ_MFLDS_LEV_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
541 |
READ_MFLDS_LEV_RS |
INTEGER j, iL, ioUnit |
|
./pkg/rw/read_mflds.F |
561 |
READ_MFLDS_LEV_RS |
ioUnit = standardMessageUnit |
|
./pkg/rw/read_mflds.F |
581 |
READ_MFLDS_LEV_RS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
590 |
READ_MFLDS_LEV_RS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
599 |
READ_MFLDS_LEV_RS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
663 |
READ_MFLDS_CHECK |
INTEGER i, j, nj, iL, ioUnit |
|
./pkg/rw/read_mflds.F |
691 |
READ_MFLDS_CHECK |
ioUnit = errorMessageUnit |
|
./pkg/rw/read_mflds.F |
695 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
698 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
702 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
706 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
711 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
731 |
READ_MFLDS_CHECK |
ioUnit = standardMessageUnit |
|
./pkg/rw/read_mflds.F |
736 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/write_glvec_rl.F |
39 |
WRITE_GLVEC_RL |
INTEGER ioUnit, bi, bj, iRec |
|
./pkg/rw/write_glvec_rl.F |
57 |
WRITE_GLVEC_RL |
ioUnit = 0 |
|
./pkg/rw/write_glvec_rl.F |
64 |
WRITE_GLVEC_RL |
I fullName, writeBinaryPrec, ioUnit, |
|
./pkg/rw/write_glvec_rs.F |
39 |
WRITE_GLVEC_RS |
INTEGER ioUnit, bi, bj, iRec |
|
./pkg/rw/write_glvec_rs.F |
57 |
WRITE_GLVEC_RS |
ioUnit = 0 |
|
./pkg/rw/write_glvec_rs.F |
64 |
WRITE_GLVEC_RS |
I fullName, writeBinaryPrec, ioUnit, |
|
./pkg/sbo/sbo_output.F |
113 |
SBO_OUTPUT |
ioUnit = standardMessageUnit |
|
./pkg/sbo/sbo_output.F |
116 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
119 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
122 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
125 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
50 |
SBO_OUTPUT |
INTEGER ioUnit |
|
./pkg/sbo/sbo_output.F |
92 |
SBO_OUTPUT |
ioUnit = 0 |
|
./pkg/sbo/sbo_output.F |
94 |
SBO_OUTPUT |
I fName, precFloat64, ioUnit, |
|
./pkg/seaice/seaice_advection.F |
146 |
SEAICE_ADVECTION |
INTEGER ioUnit |
|
./pkg/seaice/seaice_advection.F |
181 |
SEAICE_ADVECTION |
ioUnit = standardMessageUnit |
|
./pkg/seaice/seaice_advection.F |
318 |
SEAICE_ADVECTION |
IF (dBug.AND.bi.EQ.3 ) WRITE(ioUnit,*)'ICE_adv:',tracerIdentity, |
|
./pkg/seaice/seaice_advection.F |
371 |
SEAICE_ADVECTION |
WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv: xFx=', af(i+1,j), |
|
./pkg/seaice/seaice_advection.F |
573 |
SEAICE_ADVECTION |
WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv: yFx=', af(i,j+1), |
|
./pkg/seaice/seaice_advection.F |
738 |
SEAICE_ADVECTION |
WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv:', |
|
./pkg/seaice/seaice_check.F |
438 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
441 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
448 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
455 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
462 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
465 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
468 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
485 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
488 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
491 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
494 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
49 |
SEAICE_CHECK |
INTEGER ioUnit |
|
./pkg/seaice/seaice_check.F |
68 |
SEAICE_CHECK |
ioUnit = errorMessageUnit |
|
./pkg/seaice/seaice_check.F |
720 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
723 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
726 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
729 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
907 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
928 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
933 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
938 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
106 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
118 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
129 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
173 |
SEAICE_CHECK_PICKUP |
& msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
208 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
214 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
55 |
SEAICE_CHECK_PICKUP |
INTEGER nj, ioUnit |
|
./pkg/seaice/seaice_check_pickup.F |
77 |
SEAICE_CHECK_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/seaice/seaice_check_pickup.F |
98 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
101 |
SEAICE_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/seaice/seaice_read_pickup.F |
110 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
115 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
120 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
125 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
128 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
55 |
SEAICE_READ_PICKUP |
INTEGER nj, ioUnit |
|
./pkg/seaice/seaice_summary.F |
366 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
369 |
SEAICE_SUMMARY |
& .FALSE., .TRUE., ioUnit ) |
|
./pkg/seaice/seaice_summary.F |
371 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
373 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
374 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
378 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
381 |
SEAICE_SUMMARY |
& .FALSE., .TRUE., ioUnit ) |
|
./pkg/seaice/seaice_summary.F |
384 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
386 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
388 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
389 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
40 |
SEAICE_SUMMARY |
INTEGER ioUnit |
|
./pkg/seaice/seaice_summary.F |
51 |
SEAICE_SUMMARY |
ioUnit = standardMessageUnit |
|
./pkg/streamice/streamice_read_pickup.F |
101 |
STREAMICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
174 |
STREAMICE_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/streamice/streamice_read_pickup.F |
45 |
STREAMICE_READ_PICKUP |
INTEGER j, nj, ioUnit |
|
./pkg/streamice/streamice_read_pickup.F |
81 |
STREAMICE_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/streamice/streamice_read_pickup.F |
90 |
STREAMICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
96 |
STREAMICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
130 |
READ_PICKUP |
ioUnit = errorMessageUnit |
|
./model/src/read_pickup.F |
140 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
145 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
150 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
155 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
158 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
75 |
READ_PICKUP |
INTEGER j, nj, ioUnit |
|
./model/src/solve_for_pressure.F |
101 |
SOLVE_FOR_PRESSURE |
ioUnit = standardMessageUnit |
|
./model/src/solve_for_pressure.F |
104 |
SOLVE_FOR_PRESSURE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/solve_for_pressure.F |
108 |
SOLVE_FOR_PRESSURE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/solve_for_pressure.F |
111 |
SOLVE_FOR_PRESSURE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/solve_for_pressure.F |
61 |
SOLVE_FOR_PRESSURE |
INTEGER ioUnit |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
103 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
153 |
ATM_PHYS_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
47 |
ATM_PHYS_READ_PICKUP |
INTEGER j, nj, ioUnit |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
83 |
ATM_PHYS_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
92 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
98 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
117 |
AUTODIFF_WHTAPEIO_SYNC |
ioUnit=standardMessageUnit |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
118 |
AUTODIFF_WHTAPEIO_SYNC |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
146 |
AUTODIFF_WHTAPEIO_SYNC |
ioUnit=standardMessageUnit |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
147 |
AUTODIFF_WHTAPEIO_SYNC |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
56 |
AUTODIFF_WHTAPEIO_SYNC |
integer ioUnit |
|
./pkg/bbl/bbl_read_pickup.F |
100 |
BBL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
142 |
BBL_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/bbl/bbl_read_pickup.F |
46 |
BBL_READ_PICKUP |
INTEGER j, nj, ioUnit |
|
./pkg/bbl/bbl_read_pickup.F |
81 |
BBL_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/bbl/bbl_read_pickup.F |
90 |
BBL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
95 |
BBL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_printdate.F |
51 |
CAL_PRINTDATE |
integer ierr, ioUnit |
|
./pkg/cal/cal_printdate.F |
56 |
CAL_PRINTDATE |
ioUnit=standardMessageUnit |
|
./pkg/cal/cal_printdate.F |
62 |
CAL_PRINTDATE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_printdate.F |
68 |
CAL_PRINTDATE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/mds_flush.F |
10 |
MDS_FLUSH |
SUBROUTINE MDS_FLUSH( ioUnit, myThid ) |
|
./eesupp/src/mds_flush.F |
22 |
MDS_FLUSH |
INTEGER ioUnit |
|
./eesupp/src/mds_flush.F |
29 |
MDS_FLUSH |
CALL FLUSH( ioUnit ) |
|
./eesupp/src/mdsfindunit.F |
21 |
MDSFINDUNIT |
INTEGER ioUnit |
|
./eesupp/src/mdsfindunit.F |
31 |
MDSFINDUNIT |
ioUnit=-1 |
|
./eesupp/src/mdsfindunit.F |
33 |
MDSFINDUNIT |
IF ( ioUnit.EQ.-1 ) THEN |
|
./eesupp/src/mdsfindunit.F |
52 |
MDSFINDUNIT |
ioUnit=ii |
|
./eesupp/src/mdsfindunit.F |
59 |
MDSFINDUNIT |
IF ( ioUnit.EQ.-1 ) THEN |
|
./eesupp/src/mdsfindunit.F |
6 |
MDSFINDUNIT |
SUBROUTINE MDSFINDUNIT( ioUnit, myThid ) |
|
./pkg/cfc/cfc_check.F |
139 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
38 |
CFC_CHECK |
INTEGER ioUnit |
|
./pkg/cfc/cfc_check.F |
45 |
CFC_CHECK |
ioUnit = standardMessageUnit |
|
./pkg/cfc/cfc_check.F |
47 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
53 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
55 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
58 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
92 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
94 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
97 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
103 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
126 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
132 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
152 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
158 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
182 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
187 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
267 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
47 |
CHEAPAML_INIT_VARIA |
INTEGER iL, ioUnit |
|
./pkg/cheapaml/cheapaml_init_varia.F |
52 |
CHEAPAML_INIT_VARIA |
ioUnit = standardMessageUnit |
|
./pkg/cheapaml/cheapaml_init_varia.F |
98 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
103 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
164 |
CHEAPAML_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
192 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
47 |
CHEAPAML_READ_PICKUP |
INTEGER j, nj, ioUnit |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
84 |
CHEAPAML_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
93 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
98 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/print.F |
282 |
PRINT_LIST_I |
& markEnd, compact, ioUnit ) |
|
./eesupp/src/print.F |
321 |
PRINT_LIST_I |
INTEGER ioUnit |
|
./eesupp/src/print.F |
383 |
PRINT_LIST_I |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
405 |
PRINT_LIST_I |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
415 |
PRINT_LIST_L |
& markEnd, compact, ioUnit ) |
|
./eesupp/src/print.F |
454 |
PRINT_LIST_L |
INTEGER ioUnit |
|
./eesupp/src/print.F |
516 |
PRINT_LIST_L |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
538 |
PRINT_LIST_L |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
548 |
PRINT_LIST_RL |
& markEnd, compact, ioUnit ) |
|
./eesupp/src/print.F |
587 |
PRINT_LIST_RL |
INTEGER ioUnit |
|
./eesupp/src/print.F |
649 |
PRINT_LIST_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./eesupp/src/print.F |
671 |
PRINT_LIST_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1) |
|
./pkg/debug/debug_cs_corner_uv.F |
101 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,'(3A,I3)') 'DEBUG_CS_CORNER_UV: ', |
|
./pkg/debug/debug_cs_corner_uv.F |
103 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,'(2A,I4)') 'DEBUG_CS_CORNER_UV: ', |
|
./pkg/debug/debug_cs_corner_uv.F |
105 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,'(2A)') 'DEBUG_CS_CORNER_UV: ', |
|
./pkg/debug/debug_cs_corner_uv.F |
120 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:', |
|
./pkg/debug/debug_cs_corner_uv.F |
123 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:', |
|
./pkg/debug/debug_cs_corner_uv.F |
128 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:', |
|
./pkg/debug/debug_cs_corner_uv.F |
131 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:', |
|
./pkg/debug/debug_cs_corner_uv.F |
136 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:', |
|
./pkg/debug/debug_cs_corner_uv.F |
139 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:', |
|
./pkg/debug/debug_cs_corner_uv.F |
144 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:', |
|
./pkg/debug/debug_cs_corner_uv.F |
147 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:', |
|
./pkg/debug/debug_cs_corner_uv.F |
162 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:', |
|
./pkg/debug/debug_cs_corner_uv.F |
165 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:', |
|
./pkg/debug/debug_cs_corner_uv.F |
168 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:', |
|
./pkg/debug/debug_cs_corner_uv.F |
171 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:', |
|
./pkg/debug/debug_cs_corner_uv.F |
183 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:', |
|
./pkg/debug/debug_cs_corner_uv.F |
186 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:', |
|
./pkg/debug/debug_cs_corner_uv.F |
189 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:', |
|
./pkg/debug/debug_cs_corner_uv.F |
192 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:', |
|
./pkg/debug/debug_cs_corner_uv.F |
199 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,'(2A)') 'DEBUG_CS_CORNER_UV: ', |
|
./pkg/debug/debug_cs_corner_uv.F |
48 |
DEBUG_CS_CORNER_UV |
INTEGER k, ioUnit |
|
./pkg/debug/debug_cs_corner_uv.F |
98 |
DEBUG_CS_CORNER_UV |
WRITE(ioUnit,'(2A)') 'DEBUG_CS_CORNER_UV: ', |
|
./pkg/debug/debug_cs_corner_uv.F |
9 |
DEBUG_CS_CORNER_UV |
I k, ioUnit, bi,bj, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
200 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(A,I6,3A,I6)') |
|
./pkg/diagnostics/diagnostics_out.F |
253 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(A,I6,7A,I8,2A)') |
|
./pkg/diagnostics/diagnostics_out.F |
257 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(2(3A,I6,A,I8))') ' from diag: ', |
|
./pkg/diagnostics/diagnostics_out.F |
260 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(2(3A,I6,A,I8))') ' from diag: ', |
|
./pkg/diagnostics/diagnostics_out.F |
266 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(A,I6,3A,I8,2A)') |
|
./pkg/diagnostics/diagnostics_out.F |
271 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(3A,I6,2A)') |
|
./pkg/diagnostics/diagnostics_out.F |
276 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(3A,I6,3A)') |
|
./pkg/diagnostics/diagnostics_out.F |
281 |
DIAGNOSTICS_OUT |
WRITE(ioUnit,'(3A,I6,3A)') |
|
./pkg/diagnostics/diagnostics_out.F |
78 |
DIAGNOSTICS_OUT |
INTEGER ioUnit |
|
./pkg/diagnostics/diagnostics_out.F |
95 |
DIAGNOSTICS_OUT |
ioUnit= standardMessageUnit |
|
./pkg/diagnostics/diagstats_output.F |
120 |
DIAGSTATS_OUTPUT |
WRITE(ioUnit,'(A,I6,3A,I4,A,1PE10.3,2A)') |
|
./pkg/diagnostics/diagstats_output.F |
124 |
DIAGSTATS_OUTPUT |
WRITE(ioUnit,'(A,I6,3A,I4,2(A,1PE10.3))') |
|
./pkg/diagnostics/diagstats_output.F |
60 |
DIAGSTATS_OUTPUT |
INTEGER ioUnit |
|
./pkg/diagnostics/diagstats_output.F |
65 |
DIAGSTATS_OUTPUT |
ioUnit= standardMessageUnit |
|
./pkg/diagnostics/diagstats_set_regions.F |
100 |
DIAGSTATS_SET_REGIONS |
IF (ioUnit.GE.0 ) WRITE(ioUnit,'(A,I3,A)') |
|
./pkg/diagnostics/diagstats_set_regions.F |
42 |
DIAGSTATS_SET_REGIONS |
INTEGER ioUnit |
|
./pkg/diagnostics/diagstats_set_regions.F |
66 |
DIAGSTATS_SET_REGIONS |
ioUnit = -1 |
|
./pkg/diagnostics/diagstats_set_regions.F |
69 |
DIAGSTATS_SET_REGIONS |
ioUnit = standardMessageUnit |
|
./pkg/diagnostics/diagstats_set_regions.F |
91 |
DIAGSTATS_SET_REGIONS |
IF (ioUnit.GE.0 ) WRITE(ioUnit,'(2A)') |
|
./pkg/diagnostics/diagstats_set_regions.F |
96 |
DIAGSTATS_SET_REGIONS |
IF (ioUnit.GE.0 ) WRITE(ioUnit,'(A,I3)') |
|
./pkg/dic/dic_atmos.F |
146 |
DIC_ATMOS |
WRITE(ioUnit,*) 'QQ atmos C, total, pCo2', |
|
./pkg/dic/dic_atmos.F |
151 |
DIC_ATMOS |
WRITE(ioUnit,*) 'QQ total C, current, old, diff', |
|
./pkg/dic/dic_atmos.F |
154 |
DIC_ATMOS |
WRITE(ioUnit,*) 'QQ ocean C, current, old, diff', |
|
./pkg/dic/dic_atmos.F |
156 |
DIC_ATMOS |
WRITE(ioUnit,*) 'QQ air-sea flux, addition diff', |
|
./pkg/dic/dic_atmos.F |
171 |
DIC_ATMOS |
WRITE(ioUnit,*) 'QQ YEAR END' |
|
./pkg/dic/dic_atmos.F |
172 |
DIC_ATMOS |
WRITE(ioUnit,*) 'year diff: ocean, atmos, total', |
|
./pkg/dic/dic_atmos.F |
174 |
DIC_ATMOS |
WRITE(ioUnit,*) 'start diff: ocean, atmos, total ', |
|
./pkg/dic/dic_atmos.F |
64 |
DIC_ATMOS |
INTEGER ioUnit |
|
./pkg/dic/dic_atmos.F |
78 |
DIC_ATMOS |
ioUnit = standardMessageUnit |
|
./pkg/dic/dic_atmos.F |
95 |
DIC_ATMOS |
WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2 |
|
./pkg/dic/dic_ini_atmos.F |
105 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2 |
|
./pkg/dic/dic_ini_atmos.F |
172 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'QQ atmos C, total, pCo2', |
|
./pkg/dic/dic_ini_atmos.F |
177 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'QQ total C, current, old, diff', |
|
./pkg/dic/dic_ini_atmos.F |
180 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'QQ ocean C, current, old, diff', |
|
./pkg/dic/dic_ini_atmos.F |
182 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'QQ air-sea flux, addition diff', |
|
./pkg/dic/dic_ini_atmos.F |
64 |
DIC_INI_ATMOS |
INTEGER ioUnit |
|
./pkg/dic/dic_ini_atmos.F |
78 |
DIC_INI_ATMOS |
ioUnit = standardMessageUnit |
|
./pkg/dic/dic_read_co2_pickup.F |
36 |
DIC_READ_CO2_PICKUP |
INTEGER fp, ioUnit |
|
./pkg/dic/dic_read_co2_pickup.F |
70 |
DIC_READ_CO2_PICKUP |
CALL MDSFINDUNIT( ioUnit, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
72 |
DIC_READ_CO2_PICKUP |
OPEN( ioUnit, file=filNam, status='old', |
|
./pkg/dic/dic_read_co2_pickup.F |
74 |
DIC_READ_CO2_PICKUP |
READ(ioUnit,rec=1) tmpFld |
|
./pkg/dic/dic_read_pickup.F |
33 |
DIC_READ_PICKUP |
INTEGER fp, ioUnit |
|
./pkg/dic/dic_read_pickup.F |
37 |
DIC_READ_PICKUP |
ioUnit = errorMessageUnit |
|
./pkg/dic/dic_read_pickup.F |
70 |
DIC_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
75 |
DIC_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
45 |
DIC_WRITE_PICKUP |
INTEGER ioUnit |
|
./pkg/dic/dic_write_pickup.F |
65 |
DIC_WRITE_PICKUP |
ioUnit = 0 |
|
./pkg/dic/dic_write_pickup.F |
76 |
DIC_WRITE_PICKUP |
I fn, prec, ioUnit, |
|
./pkg/ecco/cost_gencost_sstv4.F |
125 |
COST_GENCOST_SSTV4 |
ioUnit=standardMessageUnit |
|
./pkg/ecco/cost_gencost_sstv4.F |
211 |
COST_GENCOST_SSTV4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
363 |
COST_GENCOST_SSTV4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
89 |
COST_GENCOST_SSTV4 |
INTEGER ioUnit |
|
./pkg/ecco/cost_readscatxfields.F |
105 |
COST_READSCATXFIELDS |
ioUnit=standardMessageUnit |
|
./pkg/ecco/cost_readscatxfields.F |
149 |
COST_READSCATXFIELDS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_readscatxfields.F |
82 |
COST_READSCATXFIELDS |
INTEGER ioUnit |
|
./pkg/ecco/cost_readscatyfields.F |
105 |
COST_READSCATYFIELDS |
ioUnit=standardMessageUnit |
|
./pkg/ecco/cost_readscatyfields.F |
148 |
COST_READSCATYFIELDS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_readscatyfields.F |
82 |
COST_READSCATYFIELDS |
INTEGER ioUnit |
|
./pkg/ecco/cost_readtopex.F |
125 |
COST_READTOPEX |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_readtopex.F |
142 |
COST_READTOPEX |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_readtopex.F |
74 |
COST_READTOPEX |
INTEGER ioUnit |
|
./pkg/ecco/cost_readtopex.F |
94 |
COST_READTOPEX |
ioUnit=standardMessageUnit |