File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
73 |
FIZHI_INIT_VEGSURFTILES |
open(iUnit,file=fn,status='old',access='direct',recl=recl) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
126 |
FIZHI_WRITE_VEGTILES |
open( iUnit, file=dataFName, status='unknown', |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
382 |
FIZHI_READ_VEGTILES |
open( iUnit, file=dataFName, status='old', |
./pkg/flt/flt_readparms.F |
29 |
FLT_READPARMS |
INTEGER iUnit |
./pkg/flt/flt_readparms.F |
51 |
FLT_READPARMS |
O iUnit, |
./pkg/flt/flt_readparms.F |
55 |
FLT_READPARMS |
READ(UNIT=iUnit,NML=FLT_NML) |
./pkg/flt/flt_readparms.F |
60 |
FLT_READPARMS |
CLOSE(iUnit) |
./pkg/gchem/gchem_readparms.F |
106 |
GCHEM_READPARMS |
CLOSE(iUnit) |
./pkg/gchem/gchem_readparms.F |
38 |
GCHEM_READPARMS |
INTEGER iUnit |
./pkg/gchem/gchem_readparms.F |
97 |
GCHEM_READPARMS |
O iUnit, |
./pkg/gchem/gchem_readparms.F |
99 |
GCHEM_READPARMS |
READ(UNIT=iUnit,NML=GCHEM_PARM01) |
./pkg/ggl90/ggl90_readparms.F |
103 |
GGL90_READPARMS |
CLOSE(iUnit) |
./pkg/ggl90/ggl90_readparms.F |
32 |
GGL90_READPARMS |
INTEGER errIO, iUnit, iL |
./pkg/ggl90/ggl90_readparms.F |
55 |
GGL90_READPARMS |
O iUnit, |
./pkg/ggl90/ggl90_readparms.F |
85 |
GGL90_READPARMS |
READ(UNIT=iUnit,NML=GGL90_PARM01,IOSTAT=errIO) |
./pkg/gmredi/gmredi_readparms.F |
106 |
GMREDI_READPARMS |
O iUnit, |
./pkg/gmredi/gmredi_readparms.F |
110 |
GMREDI_READPARMS |
READ(UNIT=iUnit,NML=GM_PARM01) |
./pkg/gmredi/gmredi_readparms.F |
115 |
GMREDI_READPARMS |
CLOSE(iUnit) |
./pkg/gmredi/gmredi_readparms.F |
40 |
GMREDI_READPARMS |
INTEGER iUnit |
./pkg/grdchk/grdchk_readparms.F |
115 |
GRDCHK_READPARMS |
O iUnit, |
./pkg/grdchk/grdchk_readparms.F |
118 |
GRDCHK_READPARMS |
READ(unit = iUnit, nml = grdchk_nml) |
./pkg/grdchk/grdchk_readparms.F |
125 |
GRDCHK_READPARMS |
CLOSE( iUnit ) |
./pkg/grdchk/grdchk_readparms.F |
48 |
GRDCHK_READPARMS |
integer iUnit |
./pkg/icefront/icefront_readparms.F |
100 |
ICEFRONT_READPARMS |
READ(UNIT=iUnit,NML=ICEFRONT_PARM01) |
./pkg/icefront/icefront_readparms.F |
107 |
ICEFRONT_READPARMS |
CLOSE(iUnit) |
./pkg/icefront/icefront_readparms.F |
37 |
ICEFRONT_READPARMS |
INTEGER iUnit |
./pkg/icefront/icefront_readparms.F |
98 |
ICEFRONT_READPARMS |
O iUnit, |
./pkg/kpp/kpp_readparms.F |
141 |
KPP_READPARMS |
READ(UNIT=iUnit,NML=KPP_PARM01,IOSTAT=errIO) |
./pkg/kpp/kpp_readparms.F |
159 |
KPP_READPARMS |
CLOSE(iUnit) |
./pkg/kpp/kpp_readparms.F |
33 |
KPP_READPARMS |
INTEGER errIO, iUnit |
./pkg/kpp/kpp_readparms.F |
62 |
KPP_READPARMS |
O iUnit, |
./pkg/land/land_readparms.F |
170 |
LAND_READPARMS |
O iUnit, myThid ) |
./pkg/land/land_readparms.F |
175 |
LAND_READPARMS |
READ(UNIT=iUnit,NML=LAND_MODEL_PAR) |
./pkg/land/land_readparms.F |
178 |
LAND_READPARMS |
READ(UNIT=iUnit,NML=LAND_PHYS_PAR) |
./pkg/land/land_readparms.F |
186 |
LAND_READPARMS |
CLOSE(iUnit) |
./pkg/land/land_readparms.F |
273 |
LAND_READPARMS |
iUnit = standardMessageUnit |
./pkg/land/land_readparms.F |
275 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
277 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
279 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
281 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
304 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
306 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
308 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
314 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
316 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
318 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
324 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
326 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
328 |
LAND_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/land/land_readparms.F |
50 |
LAND_READPARMS |
INTEGER iUnit, k, iL |
./pkg/layers/layers_readparms.F |
33 |
LAYERS_READPARMS |
INTEGER iUnit, k |
./pkg/layers/layers_readparms.F |
56 |
LAYERS_READPARMS |
O iUnit, |
./pkg/layers/layers_readparms.F |
60 |
LAYERS_READPARMS |
READ(UNIT=iUnit,NML=LAYERS_PARM01) |
./pkg/layers/layers_readparms.F |
66 |
LAYERS_READPARMS |
CLOSE(iUnit) |
./pkg/longstep/longstep_readparms.F |
32 |
LONGSTEP_READPARMS |
INTEGER iUnit |
./pkg/longstep/longstep_readparms.F |
60 |
LONGSTEP_READPARMS |
O iUnit, |
./pkg/longstep/longstep_readparms.F |
62 |
LONGSTEP_READPARMS |
READ(UNIT=iUnit,NML=LONGSTEP_PARM01) |
./pkg/longstep/longstep_readparms.F |
69 |
LONGSTEP_READPARMS |
CLOSE(iUnit) |
./pkg/longstep/longstep_readparms.F |
75 |
LONGSTEP_READPARMS |
iUnit = standardMessageUnit |
./pkg/longstep/longstep_readparms.F |
77 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/longstep/longstep_readparms.F |
79 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/longstep/longstep_readparms.F |
81 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/longstep/longstep_readparms.F |
89 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/matrix/matrix_readparms.F |
29 |
MATRIX_READPARMS |
INTEGER iUnit |
./pkg/matrix/matrix_readparms.F |
46 |
MATRIX_READPARMS |
O iUnit, |
./pkg/matrix/matrix_readparms.F |
48 |
MATRIX_READPARMS |
READ(UNIT=iUnit,NML=MATRIX_PARM01) |
./pkg/matrix/matrix_readparms.F |
55 |
MATRIX_READPARMS |
CLOSE(iUnit) |
./pkg/my82/my82_readparms.F |
34 |
MY82_READPARMS |
INTEGER iUnit |
./pkg/my82/my82_readparms.F |
68 |
MY82_READPARMS |
O iUnit, |
./pkg/my82/my82_readparms.F |
70 |
MY82_READPARMS |
READ(UNIT=iUnit,NML=MY_PARM01) |
./pkg/my82/my82_readparms.F |
77 |
MY82_READPARMS |
CLOSE(iUnit) |
./pkg/mypackage/mypackage_readparms.F |
33 |
MYPACKAGE_READPARMS |
INTEGER iUnit |
./pkg/mypackage/mypackage_readparms.F |
80 |
MYPACKAGE_READPARMS |
O iUnit, |
./pkg/mypackage/mypackage_readparms.F |
84 |
MYPACKAGE_READPARMS |
READ(UNIT=iUnit,NML=MYPACKAGE_PARM01) |
./pkg/mypackage/mypackage_readparms.F |
90 |
MYPACKAGE_READPARMS |
CLOSE(iUnit) |
./pkg/obcs/obcs_readparms.F |
263 |
OBCS_READPARMS |
O iUnit, |
./pkg/obcs/obcs_readparms.F |
267 |
OBCS_READPARMS |
READ(UNIT=iUnit,NML=OBCS_PARM01) |
./pkg/obcs/obcs_readparms.F |
280 |
OBCS_READPARMS |
& READ(UNIT=iUnit,NML=OBCS_PARM02) |
./pkg/obcs/obcs_readparms.F |
298 |
OBCS_READPARMS |
& READ(UNIT=iUnit,NML=OBCS_PARM03) |
./pkg/obcs/obcs_readparms.F |
305 |
OBCS_READPARMS |
& READ(UNIT=iUnit,NML=OBCS_PARM04) |
./pkg/obcs/obcs_readparms.F |
313 |
OBCS_READPARMS |
CLOSE(iUnit) |
./pkg/obcs/obcs_readparms.F |
49 |
OBCS_READPARMS |
INTEGER iUnit |
./pkg/ocn_compon_interf/cpl_readparms.F |
117 |
CPL_READPARMS |
READ(UNIT=iUnit,NML=CPL_OCN_PARAM) |
./pkg/ocn_compon_interf/cpl_readparms.F |
124 |
CPL_READPARMS |
CLOSE(iUnit) |
./pkg/ocn_compon_interf/cpl_readparms.F |
143 |
CPL_READPARMS |
iUnit = errorMessageUnit |
./pkg/ocn_compon_interf/cpl_readparms.F |
147 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/ocn_compon_interf/cpl_readparms.F |
151 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/ocn_compon_interf/cpl_readparms.F |
156 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/ocn_compon_interf/cpl_readparms.F |
199 |
CPL_READPARMS |
iUnit = standardMessageUnit |
./pkg/ocn_compon_interf/cpl_readparms.F |
201 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/ocn_compon_interf/cpl_readparms.F |
203 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/ocn_compon_interf/cpl_readparms.F |
205 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/ocn_compon_interf/cpl_readparms.F |
207 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/ocn_compon_interf/cpl_readparms.F |
55 |
CPL_READPARMS |
INTEGER iUnit |
./pkg/ocn_compon_interf/cpl_readparms.F |
87 |
CPL_READPARMS |
O iUnit, myThid ) |
./pkg/offline/offline_readparms.F |
103 |
OFFLINE_READPARMS |
READ(UNIT=iUnit,NML=OFFLINE_PARM02) |
./pkg/offline/offline_readparms.F |
111 |
OFFLINE_READPARMS |
CLOSE(iUnit) |
./pkg/offline/offline_readparms.F |
31 |
OFFLINE_READPARMS |
INTEGER iUnit |
./pkg/offline/offline_readparms.F |
59 |
OFFLINE_READPARMS |
O iUnit, |
./pkg/offline/offline_readparms.F |
80 |
OFFLINE_READPARMS |
READ(UNIT=iUnit,NML=OFFLINE_PARM01) |
./pkg/opps/opps_readparms.F |
34 |
OPPS_READPARMS |
INTEGER iUnit |
./pkg/opps/opps_readparms.F |
77 |
OPPS_READPARMS |
O iUnit, |
./pkg/opps/opps_readparms.F |
79 |
OPPS_READPARMS |
READ(UNIT=iUnit,NML=OPPS_PARM01) |
./pkg/opps/opps_readparms.F |
86 |
OPPS_READPARMS |
CLOSE(iUnit) |
./pkg/pp81/pp81_readparms.F |
34 |
PP81_READPARMS |
INTEGER iUnit |
./pkg/pp81/pp81_readparms.F |
74 |
PP81_READPARMS |
O iUnit, |
./pkg/pp81/pp81_readparms.F |
76 |
PP81_READPARMS |
READ(UNIT=iUnit,NML=PP81_PARM01) |
./pkg/pp81/pp81_readparms.F |
83 |
PP81_READPARMS |
CLOSE(iUnit) |
./pkg/profiles/profiles_readparms.F |
106 |
PROFILES_READPARMS |
CLOSE( iUnit ) |
./pkg/profiles/profiles_readparms.F |
39 |
PROFILES_READPARMS |
INTEGER iUnit, num_file, num_var |
./pkg/profiles/profiles_readparms.F |
96 |
PROFILES_READPARMS |
O iUnit, |
./pkg/profiles/profiles_readparms.F |
99 |
PROFILES_READPARMS |
READ( iUnit, nml = profiles_nml ) |
./pkg/ptracers/ptracers_readparms.F |
155 |
PTRACERS_READPARMS |
O iUnit, |
./pkg/ptracers/ptracers_readparms.F |
157 |
PTRACERS_READPARMS |
READ(UNIT=iUnit,NML=PTRACERS_PARM01) |
./pkg/ptracers/ptracers_readparms.F |
164 |
PTRACERS_READPARMS |
CLOSE(iUnit) |
./pkg/ptracers/ptracers_readparms.F |
292 |
PTRACERS_READPARMS |
iUnit = standardMessageUnit |
./pkg/ptracers/ptracers_readparms.F |
294 |
PTRACERS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/ptracers/ptracers_readparms.F |
296 |
PTRACERS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/ptracers/ptracers_readparms.F |
298 |
PTRACERS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
./pkg/ptracers/ptracers_readparms.F |
334 |
PTRACERS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/ptracers/ptracers_readparms.F |
336 |
PTRACERS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/ptracers/ptracers_readparms.F |
367 |
PTRACERS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./pkg/ptracers/ptracers_readparms.F |
44 |
PTRACERS_READPARMS |
INTEGER iUnit |
./pkg/rbcs/rbcs_readparms.F |
108 |
RBCS_READPARMS |
O iUnit, |
./pkg/rbcs/rbcs_readparms.F |
110 |
RBCS_READPARMS |
READ(UNIT=iUnit,NML=RBCS_PARM01) |
./pkg/rbcs/rbcs_readparms.F |
112 |
RBCS_READPARMS |
READ(UNIT=iUnit,NML=RBCS_PARM02) |
./pkg/rbcs/rbcs_readparms.F |
120 |
RBCS_READPARMS |
CLOSE(iUnit) |
./pkg/rbcs/rbcs_readparms.F |
38 |
RBCS_READPARMS |
INTEGER iUnit |
./pkg/regrid/regrid_init_varia.F |
141 |
REGRID_INIT_VARIA |
CLOSE(iUnit) |
./pkg/regrid/regrid_init_varia.F |
145 |
REGRID_INIT_VARIA |
open(unit=iUnit, file=fname, status='old', iostat=errIO) |
./pkg/regrid/regrid_init_varia.F |
153 |
REGRID_INIT_VARIA |
CLOSE(iUnit) |
./pkg/regrid/regrid_init_varia.F |
163 |
REGRID_INIT_VARIA |
READ(iUnit,fmt='(2(1X,I10),1X,E28.22)',iostat=errIO) |
./pkg/regrid/regrid_init_varia.F |
180 |
REGRID_INIT_VARIA |
close(iUnit) |
./pkg/regrid/regrid_init_varia.F |
39 |
REGRID_INIT_VARIA |
INTEGER iUnit, errIO, nnb |
./pkg/regrid/regrid_init_varia.F |
84 |
REGRID_INIT_VARIA |
CALL MDSFINDUNIT(iUnit, myThid) |
./pkg/regrid/regrid_readparms.F |
33 |
REGRID_READPARMS |
INTEGER iUnit, i |
./pkg/regrid/regrid_readparms.F |
61 |
REGRID_READPARMS |
O iUnit, |
./pkg/regrid/regrid_readparms.F |
65 |
REGRID_READPARMS |
READ(UNIT=iUnit,NML=REGRID_PARM01) |
./pkg/regrid/regrid_readparms.F |
71 |
REGRID_READPARMS |
CLOSE(iUnit) |
./pkg/runclock/runclock_readparms.F |
32 |
RUNCLOCK_READPARMS |
INTEGER iUnit |
./pkg/runclock/runclock_readparms.F |
45 |
RUNCLOCK_READPARMS |
O iUnit, |
./pkg/runclock/runclock_readparms.F |
54 |
RUNCLOCK_READPARMS |
READ(UNIT=iUnit,NML=RUNCLOCK) |
./pkg/runclock/runclock_readparms.F |
61 |
RUNCLOCK_READPARMS |
CLOSE(iUnit) |
./pkg/salt_plume/salt_plume_readparms.F |
37 |
SALT_PLUME_READPARMS |
INTEGER iUnit |
./pkg/salt_plume/salt_plume_readparms.F |
54 |
SALT_PLUME_READPARMS |
O iUnit, |
./pkg/salt_plume/salt_plume_readparms.F |
58 |
SALT_PLUME_READPARMS |
READ(UNIT=iUnit,NML=SALT_PLUME_PARM01) |
./pkg/salt_plume/salt_plume_readparms.F |
64 |
SALT_PLUME_READPARMS |
CLOSE(iUnit) |
./pkg/sbo/sbo_readparms.F |
31 |
SBO_READPARMS |
INTEGER errIO, iUnit |
./pkg/sbo/sbo_readparms.F |
46 |
SBO_READPARMS |
O iUnit, |
./pkg/sbo/sbo_readparms.F |
55 |
SBO_READPARMS |
READ(UNIT=iUnit,NML=SBO_PARM01,IOSTAT=errIO) |
./pkg/sbo/sbo_readparms.F |
73 |
SBO_READPARMS |
CLOSE(iUnit) |
./pkg/seaice/seaice_readparms.F |
115 |
SEAICE_READPARMS |
O iUnit, |
./pkg/seaice/seaice_readparms.F |
305 |
SEAICE_READPARMS |
READ(UNIT=iUnit,NML=SEAICE_PARM01) |
./pkg/seaice/seaice_readparms.F |
308 |
SEAICE_READPARMS |
READ(UNIT=iUnit,NML=SEAICE_PARM02) |
./pkg/seaice/seaice_readparms.F |
311 |
SEAICE_READPARMS |
CLOSE(iUnit) |
./pkg/seaice/seaice_readparms.F |
41 |
SEAICE_READPARMS |
INTEGER iUnit |
./pkg/shap_filt/shap_filt_readparms.F |
39 |
SHAP_FILT_READPARMS |
INTEGER iUnit |
./pkg/shap_filt/shap_filt_readparms.F |
61 |
SHAP_FILT_READPARMS |
O iUnit, |
./pkg/shap_filt/shap_filt_readparms.F |
83 |
SHAP_FILT_READPARMS |
READ(UNIT=iUnit,NML=SHAP_PARM01) |
./pkg/shap_filt/shap_filt_readparms.F |
91 |
SHAP_FILT_READPARMS |
CLOSE(iUnit) |
./pkg/shelfice/shelfice_readparms.F |
106 |
SHELFICE_READPARMS |
CLOSE(iUnit) |
./pkg/shelfice/shelfice_readparms.F |
37 |
SHELFICE_READPARMS |
INTEGER iUnit |
./pkg/shelfice/shelfice_readparms.F |
97 |
SHELFICE_READPARMS |
O iUnit, |
./pkg/shelfice/shelfice_readparms.F |
99 |
SHELFICE_READPARMS |
READ(UNIT=iUnit,NML=SHELFICE_PARM01) |
./pkg/smooth/smooth_readparms.F |
32 |
SMOOTH_READPARMS |
INTEGER iUnit, num_file, num_var |
./pkg/smooth/smooth_readparms.F |
87 |
SMOOTH_READPARMS |
O iUnit, |
./pkg/smooth/smooth_readparms.F |
90 |
SMOOTH_READPARMS |
READ( iUnit, nml = smooth_nml ) |
./pkg/smooth/smooth_readparms.F |
97 |
SMOOTH_READPARMS |
CLOSE( iUnit ) |
./pkg/thsice/thsice_readparms.F |
169 |
THSICE_READPARMS |
READ(UNIT=iUnit,NML=THSICE_CONST) |
./pkg/thsice/thsice_readparms.F |
174 |
THSICE_READPARMS |
READ(UNIT=iUnit,NML=THSICE_PARM01) |
./pkg/thsice/thsice_readparms.F |
180 |
THSICE_READPARMS |
CLOSE(iUnit) |
./pkg/thsice/thsice_readparms.F |
253 |
THSICE_READPARMS |
iUnit = standardMessageUnit |
./pkg/thsice/thsice_readparms.F |
256 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: rhos =',rhos |
./pkg/thsice/thsice_readparms.F |
257 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: rhoi =',rhoi |
./pkg/thsice/thsice_readparms.F |
258 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: rhosw =',rhosw |
./pkg/thsice/thsice_readparms.F |
259 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: rhofw =',rhofw |
./pkg/thsice/thsice_readparms.F |
260 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: floodFac =',floodFac |
./pkg/thsice/thsice_readparms.F |
261 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: cpIce =',cpIce |
./pkg/thsice/thsice_readparms.F |
262 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: cpWater =',cpWater |
./pkg/thsice/thsice_readparms.F |
263 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: kIce =',kIce |
./pkg/thsice/thsice_readparms.F |
264 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: kSnow =',kSnow |
./pkg/thsice/thsice_readparms.F |
265 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: bMeltCoef =',bMeltCoef |
./pkg/thsice/thsice_readparms.F |
266 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: Lfresh =',Lfresh |
./pkg/thsice/thsice_readparms.F |
267 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: qsnow =',qsnow |
./pkg/thsice/thsice_readparms.F |
268 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: albColdSnow=',albColdSnow |
./pkg/thsice/thsice_readparms.F |
269 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: albWarmSnow=',albWarmSnow |
./pkg/thsice/thsice_readparms.F |
270 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: tempSnowAlb=',tempSnowAlb |
./pkg/thsice/thsice_readparms.F |
271 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: albOldSnow =',albOldSnow |
./pkg/thsice/thsice_readparms.F |
272 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hNewSnowAge=',hNewSnowAge |
./pkg/thsice/thsice_readparms.F |
273 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: snowAgTime =',snowAgTime |
./pkg/thsice/thsice_readparms.F |
274 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: albIceMax =',albIceMax |
./pkg/thsice/thsice_readparms.F |
275 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: albIceMin =',albIceMin |
./pkg/thsice/thsice_readparms.F |
276 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hAlbIce =',hAlbIce |
./pkg/thsice/thsice_readparms.F |
277 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hAlbSnow =',hAlbSnow |
./pkg/thsice/thsice_readparms.F |
278 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: i0swFrac =',i0swFrac |
./pkg/thsice/thsice_readparms.F |
279 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: ksolar =',ksolar |
./pkg/thsice/thsice_readparms.F |
280 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: dhSnowLin =',dhSnowLin |
./pkg/thsice/thsice_readparms.F |
281 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: saltIce =',saltIce |
./pkg/thsice/thsice_readparms.F |
282 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: S_winton =',S_winton |
./pkg/thsice/thsice_readparms.F |
283 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: mu_Tf =',mu_Tf |
./pkg/thsice/thsice_readparms.F |
284 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: Tf0kel =',Tf0kel |
./pkg/thsice/thsice_readparms.F |
285 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: Tmlt1 =',Tmlt1 |
./pkg/thsice/thsice_readparms.F |
286 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: Terrmax =',Terrmax |
./pkg/thsice/thsice_readparms.F |
287 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: nitMaxTsf =',nitMaxTsf |
./pkg/thsice/thsice_readparms.F |
288 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hIceMin =',hIceMin |
./pkg/thsice/thsice_readparms.F |
289 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hiMax =',hiMax |
./pkg/thsice/thsice_readparms.F |
290 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hsMax =',hsMax |
./pkg/thsice/thsice_readparms.F |
291 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: iceMaskMax =',iceMaskMax |
./pkg/thsice/thsice_readparms.F |
292 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: iceMaskMin =',iceMaskMin |
./pkg/thsice/thsice_readparms.F |
293 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: fracEnMelt =',fracEnMelt |
./pkg/thsice/thsice_readparms.F |
294 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: fracEnFreez=',fracEnFreez |
./pkg/thsice/thsice_readparms.F |
295 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hThinIce =',hThinIce |
./pkg/thsice/thsice_readparms.F |
296 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hThickIce =',hThickIce |
./pkg/thsice/thsice_readparms.F |
297 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hNewIceMax =',hNewIceMax |
./pkg/thsice/thsice_readparms.F |
298 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: stressReduction =',stressReduction |
./pkg/thsice/thsice_readparms.F |
299 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: thSIceAdvScheme =',thSIceAdvScheme |
./pkg/thsice/thsice_readparms.F |
300 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: thSIce_diffK =',thSIce_diffK |
./pkg/thsice/thsice_readparms.F |
301 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: thSIce_deltaT =',thSIce_deltaT |
./pkg/thsice/thsice_readparms.F |
302 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: ocean_deltaT =',ocean_deltaT |
./pkg/thsice/thsice_readparms.F |
303 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: stepFwd_oceMxL=',stepFwd_oceMxL |
./pkg/thsice/thsice_readparms.F |
304 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: tauRelax_MxL =',tauRelax_MxL |
./pkg/thsice/thsice_readparms.F |
305 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: tauRelax_MxL_salt =',tauRelax_MxL_salt |
./pkg/thsice/thsice_readparms.F |
306 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: hMxL_default =',hMxL_default |
./pkg/thsice/thsice_readparms.F |
307 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: sMxL_default =',sMxL_default |
./pkg/thsice/thsice_readparms.F |
308 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: vMxL_default =',vMxL_default |
./pkg/thsice/thsice_readparms.F |
309 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: thSIce_taveFreq=',thSIce_taveFreq |
./pkg/thsice/thsice_readparms.F |
310 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: thSIce_diagFreq=',thSIce_diagFreq |
./pkg/thsice/thsice_readparms.F |
311 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: thSIce_monFreq =',thSIce_monFreq |
./pkg/thsice/thsice_readparms.F |
312 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: startIceModel =',startIceModel |
./pkg/thsice/thsice_readparms.F |
313 |
THSICE_READPARMS |
IF (iUnit.NE.standardMessageUnit) CLOSE(iUnit) |
./pkg/thsice/thsice_readparms.F |
45 |
THSICE_READPARMS |
INTEGER iUnit |
./pkg/thsice/thsice_readparms.F |
83 |
THSICE_READPARMS |
O iUnit, |
./pkg/zonal_filt/zonal_filt_readparms.F |
35 |
ZONAL_FILT_READPARMS |
INTEGER iUnit |
./pkg/zonal_filt/zonal_filt_readparms.F |
49 |
ZONAL_FILT_READPARMS |
O iUnit, |
./pkg/zonal_filt/zonal_filt_readparms.F |
61 |
ZONAL_FILT_READPARMS |
READ(UNIT=iUnit,NML=ZONFILT_PARM01) |
./pkg/zonal_filt/zonal_filt_readparms.F |
73 |
ZONAL_FILT_READPARMS |
CLOSE(iUnit) |
./model/src/ini_parms.F |
1229 |
INI_PARMS |
READ(UNIT=iUnit,NML=PARM05) !,IOSTAT=errIO) |
./model/src/ini_parms.F |
1316 |
INI_PARMS |
CLOSE(iUnit) |
./model/src/ini_parms.F |
315 |
INI_PARMS |
O iUnit, myThid ) |
./model/src/ini_parms.F |
360 |
INI_PARMS |
READ(UNIT=iUnit,NML=PARM01) !,IOSTAT=errIO) |
./model/src/ini_parms.F |
49 |
INI_PARMS |
INTEGER k, i, j, iUnit |
./model/src/ini_parms.F |
731 |
INI_PARMS |
READ(UNIT=iUnit,NML=PARM02) !,IOSTAT=errIO) |
./model/src/ini_parms.F |
754 |
INI_PARMS |
READ(UNIT=iUnit,NML=PARM03) !,IOSTAT=errIO) |
./model/src/ini_parms.F |
980 |
INI_PARMS |
READ(UNIT=iUnit,NML=PARM04,IOSTAT=errIO) |
./model/src/packages_boot.F |
101 |
PACKAGES_BOOT |
O iUnit, |
./model/src/packages_boot.F |
150 |
PACKAGES_BOOT |
READ(UNIT=iUnit,NML=PACKAGES) |
./model/src/packages_boot.F |
158 |
PACKAGES_BOOT |
CLOSE(iUnit) |
./model/src/packages_boot.F |
44 |
PACKAGES_BOOT |
INTEGER iUnit |
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
39 |
COST_WEIGHTS |
INTEGER iUnit, length_of_rec |
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
81 |
COST_WEIGHTS |
CALL MDSFINDUNIT( iUnit, myThid ) |
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
83 |
COST_WEIGHTS |
OPEN( iUnit, FILE='Err_levitus_15layer.bin', STATUS='OLD', |
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
85 |
COST_WEIGHTS |
READ(iUnit,rec=1) tmpwti |
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
86 |
COST_WEIGHTS |
CLOSE(iUnit) |
./eesupp/src/eeset_parms.F |
173 |
EESET_PARMS |
iUnit = scrUnit2 |
./eesupp/src/eeset_parms.F |
174 |
EESET_PARMS |
REWIND(iUnit) |
./eesupp/src/eeset_parms.F |
176 |
EESET_PARMS |
READ(UNIT=iUnit,FMT='(A)',END=2001) RECORD |
./eesupp/src/eeset_parms.F |
182 |
EESET_PARMS |
CLOSE(iUnit) |
./eesupp/src/eeset_parms.F |
188 |
EESET_PARMS |
iUnit = scrUnit1 |
./eesupp/src/eeset_parms.F |
189 |
EESET_PARMS |
REWIND(iUnit) |
./eesupp/src/eeset_parms.F |
190 |
EESET_PARMS |
READ(UNIT=iUnit,NML=EEPARMS,IOSTAT=errIO,err=3) |
./eesupp/src/eeset_parms.F |
209 |
EESET_PARMS |
CLOSE(iUnit) |
./eesupp/src/eeset_parms.F |
44 |
EESET_PARMS |
INTEGER iUnit |
./pkg/aim_compon_interf/cpl_readparms.F |
101 |
CPL_READPARMS |
READ(UNIT=iUnit,NML=CPL_ATM_PARAM) |
./pkg/aim_compon_interf/cpl_readparms.F |
108 |
CPL_READPARMS |
CLOSE(iUnit) |
./pkg/aim_compon_interf/cpl_readparms.F |
126 |
CPL_READPARMS |
iUnit = standardMessageUnit |
./pkg/aim_compon_interf/cpl_readparms.F |
128 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/aim_compon_interf/cpl_readparms.F |
130 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/aim_compon_interf/cpl_readparms.F |
132 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/aim_compon_interf/cpl_readparms.F |
134 |
CPL_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,1) |
./pkg/aim_compon_interf/cpl_readparms.F |
51 |
CPL_READPARMS |
INTEGER iUnit |
./pkg/aim_compon_interf/cpl_readparms.F |
82 |
CPL_READPARMS |
O iUnit, myThid ) |
./pkg/aim_v23/aim_do_co2.F |
109 |
AIM_DO_CO2 |
CALL MDSFINDUNIT( iUnit, myThid ) |
./pkg/aim_v23/aim_do_co2.F |
111 |
AIM_DO_CO2 |
OPEN(UNIT=iUnit,FILE=fn(ilo:ihi),STATUS='old', |
./pkg/aim_v23/aim_do_co2.F |
113 |
AIM_DO_CO2 |
READ(iUnit,rec=1) tmpco2 |
./pkg/aim_v23/aim_do_co2.F |
114 |
AIM_DO_CO2 |
CLOSE(iUnit) |
./pkg/aim_v23/aim_do_co2.F |
123 |
AIM_DO_CO2 |
iUnit = standardMessageUnit |
./pkg/aim_v23/aim_do_co2.F |
125 |
AIM_DO_CO2 |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/aim_v23/aim_do_co2.F |
127 |
AIM_DO_CO2 |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/aim_v23/aim_do_co2.F |
129 |
AIM_DO_CO2 |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/aim_v23/aim_do_co2.F |
157 |
AIM_DO_CO2 |
CALL MDSFINDUNIT( iUnit, myThid ) |
./pkg/aim_v23/aim_do_co2.F |
159 |
AIM_DO_CO2 |
OPEN(UNIT=iUnit,FILE=fn,STATUS='unknown', |
./pkg/aim_v23/aim_do_co2.F |
163 |
AIM_DO_CO2 |
WRITE(iUnit,rec=1) tmpco2 |
./pkg/aim_v23/aim_do_co2.F |
164 |
AIM_DO_CO2 |
CLOSE(iUnit) |
./pkg/aim_v23/aim_do_co2.F |
50 |
AIM_DO_CO2 |
INTEGER iUnit, length_of_rec |
./pkg/aim_v23/aim_readparms.F |
275 |
AIM_READPARMS |
O iUnit, myThid ) |
./pkg/aim_v23/aim_readparms.F |
280 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PARAMS) |
./pkg/aim_v23/aim_readparms.F |
283 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_FOR) |
./pkg/aim_v23/aim_readparms.F |
286 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_SFL) |
./pkg/aim_v23/aim_readparms.F |
289 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_CNV) |
./pkg/aim_v23/aim_readparms.F |
292 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_LSC) |
./pkg/aim_v23/aim_readparms.F |
295 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_RAD) |
./pkg/aim_v23/aim_readparms.F |
298 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_VDI) |
./pkg/aim_v23/aim_readparms.F |
302 |
AIM_READPARMS |
READ(UNIT=iUnit,NML=AIM_PAR_CO2) |
./pkg/aim_v23/aim_readparms.F |
310 |
AIM_READPARMS |
CLOSE(iUnit) |
./pkg/aim_v23/aim_readparms.F |
59 |
AIM_READPARMS |
INTEGER iUnit |
./pkg/atm2d/atm2d_readparms.F |
100 |
ATM2D_READPARMS |
READ(UNIT=iUnit,NML=PARM05_ATM2D) |
./pkg/atm2d/atm2d_readparms.F |
107 |
ATM2D_READPARMS |
CLOSE(iUnit) |
./pkg/atm2d/atm2d_readparms.F |
48 |
ATM2D_READPARMS |
INTEGER iUnit |
./pkg/atm2d/atm2d_readparms.F |
58 |
ATM2D_READPARMS |
O iUnit, |
./pkg/atm2d/atm2d_readparms.F |
92 |
ATM2D_READPARMS |
READ(UNIT=iUnit,NML=PARM01_ATM2D) |
./pkg/atm2d/atm2d_readparms.F |
94 |
ATM2D_READPARMS |
READ(UNIT=iUnit,NML=PARM02_ATM2D) |
./pkg/atm2d/atm2d_readparms.F |
96 |
ATM2D_READPARMS |
READ(UNIT=iUnit,NML=PARM03_ATM2D) |
./pkg/atm2d/atm2d_readparms.F |
98 |
ATM2D_READPARMS |
READ(UNIT=iUnit,NML=PARM04_ATM2D) |
./pkg/bulk_force/bulkf_readparms.F |
142 |
BULKF_READPARMS |
READ(UNIT=iUnit,NML=BULKF_CONST) |
./pkg/bulk_force/bulkf_readparms.F |
150 |
BULKF_READPARMS |
READ(UNIT=iUnit,NML=BULKF_PARM01) |
./pkg/bulk_force/bulkf_readparms.F |
162 |
BULKF_READPARMS |
READ(UNIT=iUnit,NML=BULKF_PARM02) |
./pkg/bulk_force/bulkf_readparms.F |
170 |
BULKF_READPARMS |
CLOSE(iUnit) |
./pkg/bulk_force/bulkf_readparms.F |
193 |
BULKF_READPARMS |
iUnit = standardMessageUnit |
./pkg/bulk_force/bulkf_readparms.F |
197 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: rhoA =',rhoA |
./pkg/bulk_force/bulkf_readparms.F |
198 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: rhoFW =',rhoFW |
./pkg/bulk_force/bulkf_readparms.F |
199 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cpAir =',cpAir |
./pkg/bulk_force/bulkf_readparms.F |
201 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: Lvap =',Lvap |
./pkg/bulk_force/bulkf_readparms.F |
202 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: Lfresh =',Lfresh |
./pkg/bulk_force/bulkf_readparms.F |
205 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: Tf0kel =',Tf0kel |
./pkg/bulk_force/bulkf_readparms.F |
206 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: Rgas =',Rgas |
./pkg/bulk_force/bulkf_readparms.F |
208 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: xkar =',xkar |
./pkg/bulk_force/bulkf_readparms.F |
209 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: stefan =',stefan |
./pkg/bulk_force/bulkf_readparms.F |
210 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: zref =',zref |
./pkg/bulk_force/bulkf_readparms.F |
211 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: zwd =',zwd |
./pkg/bulk_force/bulkf_readparms.F |
212 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: zth =',zth |
./pkg/bulk_force/bulkf_readparms.F |
213 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cDrag_1 =',cDrag_1 |
./pkg/bulk_force/bulkf_readparms.F |
214 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cDrag_2 =',cDrag_2 |
./pkg/bulk_force/bulkf_readparms.F |
215 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cDrag_3 =',cDrag_3 |
./pkg/bulk_force/bulkf_readparms.F |
216 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cStantonS=',cStantonS |
./pkg/bulk_force/bulkf_readparms.F |
217 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cStantonU=',cStantonU |
./pkg/bulk_force/bulkf_readparms.F |
218 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: cDalton =',cDalton |
./pkg/bulk_force/bulkf_readparms.F |
219 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: umin =',umin |
./pkg/bulk_force/bulkf_readparms.F |
220 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: humid_fac=',humid_fac |
./pkg/bulk_force/bulkf_readparms.F |
221 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: saltQsFac=',saltQsFac |
./pkg/bulk_force/bulkf_readparms.F |
222 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: gamma_blk=',gamma_blk |
./pkg/bulk_force/bulkf_readparms.F |
223 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: atm_emissivity =',atm_emissivity |
./pkg/bulk_force/bulkf_readparms.F |
224 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: ocean_emissivity=',ocean_emissivity |
./pkg/bulk_force/bulkf_readparms.F |
225 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: snow_emissivity =',snow_emissivity |
./pkg/bulk_force/bulkf_readparms.F |
226 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: ice_emissivity =',ice_emissivity |
./pkg/bulk_force/bulkf_readparms.F |
227 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: ocean_albedo =',ocean_albedo |
./pkg/bulk_force/bulkf_readparms.F |
229 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: FWIND0 =', FWIND0 |
./pkg/bulk_force/bulkf_readparms.F |
230 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: CHS =', CHS |
./pkg/bulk_force/bulkf_readparms.F |
231 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: VGUST =', VGUST |
./pkg/bulk_force/bulkf_readparms.F |
232 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: DTHETA =', DTHETA |
./pkg/bulk_force/bulkf_readparms.F |
233 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: dTstab =', dTstab |
./pkg/bulk_force/bulkf_readparms.F |
234 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: FSTAB =', FSTAB |
./pkg/bulk_force/bulkf_readparms.F |
236 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: useFluxFormula_AIM=',useFluxFormula_AIM |
./pkg/bulk_force/bulkf_readparms.F |
237 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: calcWindStress =', calcWindStress |
./pkg/bulk_force/bulkf_readparms.F |
238 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: useQnetch =', useQnetch |
./pkg/bulk_force/bulkf_readparms.F |
239 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: useEmPch =', useEmPch |
./pkg/bulk_force/bulkf_readparms.F |
240 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: blk_nIter =',blk_nIter |
./pkg/bulk_force/bulkf_readparms.F |
241 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: blk_taveFreq=', blk_taveFreq |
./pkg/bulk_force/bulkf_readparms.F |
242 |
BULKF_READPARMS |
IF (iUnit.EQ.88) CLOSE(iUnit) |
./pkg/bulk_force/bulkf_readparms.F |
33 |
BULKF_READPARMS |
INTEGER iUnit |
./pkg/bulk_force/bulkf_readparms.F |
70 |
BULKF_READPARMS |
O iUnit, |
./pkg/cal/cal_readparms.F |
127 |
CAL_READPARMS |
O iUnit, |
./pkg/cal/cal_readparms.F |
130 |
CAL_READPARMS |
READ(unit = iUnit, nml = cal_nml) |
./pkg/cal/cal_readparms.F |
137 |
CAL_READPARMS |
CLOSE( iUnit ) |
./pkg/cal/cal_readparms.F |
87 |
CAL_READPARMS |
integer iUnit |
./pkg/cfc/cfc_atmos.F |
29 |
CFC_ATMOS |
integer nTimePnts, iUnit, it |
./pkg/cfc/cfc_atmos.F |
59 |
CFC_ATMOS |
CALL MDSFINDUNIT( iUnit, mythid ) |
./pkg/cfc/cfc_atmos.F |
60 |
CFC_ATMOS |
OPEN(iUnit,FILE='cfc1112.atm',STATUS='old') |
./pkg/cfc/cfc_atmos.F |
63 |
CFC_ATMOS |
READ(iUnit,*) |
./pkg/cfc/cfc_atmos.F |
67 |
CFC_ATMOS |
READ(iUnit,*) year(it),ACFC11(it,1),ACFC12(it,1), |
./pkg/cfc/cfc_atmos.F |
77 |
CFC_ATMOS |
CLOSE(iUnit) |
./pkg/cfc/cfc_readparms.F |
39 |
CFC_READPARMS |
INTEGER iUnit |
./pkg/cfc/cfc_readparms.F |
63 |
CFC_READPARMS |
O iUnit, myThid ) |
./pkg/cfc/cfc_readparms.F |
68 |
CFC_READPARMS |
READ(UNIT=iUnit,NML=CFC_FORCING) |
./pkg/cfc/cfc_readparms.F |
76 |
CFC_READPARMS |
CLOSE(iUnit) |
./pkg/cheapaml/cheapaml_readparms.F |
101 |
CHEAPAML_READPARMS |
READ(UNIT=iUnit,NML=CHEAPAML_CONST) |
./pkg/cheapaml/cheapaml_readparms.F |
112 |
CHEAPAML_READPARMS |
READ(UNIT=iUnit,NML=CHEAPAML_PARM01) |
./pkg/cheapaml/cheapaml_readparms.F |
122 |
CHEAPAML_READPARMS |
READ(UNIT=iUnit,NML=CHEAPAML_PARM02) |
./pkg/cheapaml/cheapaml_readparms.F |
137 |
CHEAPAML_READPARMS |
CLOSE(iUnit) |
./pkg/cheapaml/cheapaml_readparms.F |
140 |
CHEAPAML_READPARMS |
iUnit = standardMessageUnit |
./pkg/cheapaml/cheapaml_readparms.F |
141 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: ntim =',cheapaml_ntim |
./pkg/cheapaml/cheapaml_readparms.F |
142 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: h =',cheapaml_h |
./pkg/cheapaml/cheapaml_readparms.F |
143 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: kdiff =',cheapaml_kdiff |
./pkg/cheapaml/cheapaml_readparms.F |
145 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: tau2 =',cheapaml_taurelax2 |
./pkg/cheapaml/cheapaml_readparms.F |
148 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: rhoa =',rhoa |
./pkg/cheapaml/cheapaml_readparms.F |
149 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: cpair =',cpair |
./pkg/cheapaml/cheapaml_readparms.F |
150 |
CHEAPAML_READPARMS |
WRITE(iUnit,*) 'Caml: stefan =',stefan |
./pkg/cheapaml/cheapaml_readparms.F |
26 |
CHEAPAML_READPARMS |
INTEGER iUnit |
./pkg/cheapaml/cheapaml_readparms.F |
58 |
CHEAPAML_READPARMS |
O iUnit, |
./eesupp/src/nml_change_syntax.F |
116 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
117 |
NML_CHANGE_SYNTAX |
WRITE(iUnit,'(A)') record(1:il) |
./eesupp/src/nml_change_syntax.F |
121 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
137 |
NML_CHANGE_SYNTAX |
WRITE(iUnit,'(5A)') ' ',data_file,' , rec >',record(1:i0),'<' |
./eesupp/src/nml_change_syntax.F |
138 |
NML_CHANGE_SYNTAX |
WRITE(iUnit,'(A,2I4,L5,A,4I4)') |
./eesupp/src/nml_change_syntax.F |
146 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
147 |
NML_CHANGE_SYNTAX |
WRITE(iUnit,'(A)') record(1:il) |
./eesupp/src/nml_change_syntax.F |
151 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
194 |
NML_CHANGE_SYNTAX |
IF ( debugPrt ) WRITE(iUnit,'(3A)') |
./eesupp/src/nml_change_syntax.F |
202 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
203 |
NML_CHANGE_SYNTAX |
WRITE(iUnit,'(A)') record(1:il) |
./eesupp/src/nml_change_syntax.F |
207 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
215 |
NML_CHANGE_SYNTAX |
IF ( debugPrt ) WRITE(iUnit,'(3A)') |
./eesupp/src/nml_change_syntax.F |
223 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
224 |
NML_CHANGE_SYNTAX |
WRITE(iUnit,'(A)') record(1:il) |
./eesupp/src/nml_change_syntax.F |
228 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
./eesupp/src/nml_change_syntax.F |
65 |
NML_CHANGE_SYNTAX |
INTEGER nWd, is, ie, iUnit |
./eesupp/src/nml_change_syntax.F |
85 |
NML_CHANGE_SYNTAX |
iUnit = errorMessageUnit |
./eesupp/src/open_copy_data_file.F |
118 |
OPEN_COPY_DATA_FILE |
iUnit = scrUnit2 |
./eesupp/src/open_copy_data_file.F |
119 |
OPEN_COPY_DATA_FILE |
REWIND(iUnit) |
./eesupp/src/open_copy_data_file.F |
11 |
OPEN_COPY_DATA_FILE |
O iUnit, |
./eesupp/src/open_copy_data_file.F |
121 |
OPEN_COPY_DATA_FILE |
READ(UNIT=iUnit,FMT='(A)',END=2001) RECORD |
./eesupp/src/open_copy_data_file.F |
128 |
OPEN_COPY_DATA_FILE |
CLOSE(iUnit) |
./eesupp/src/open_copy_data_file.F |
134 |
OPEN_COPY_DATA_FILE |
iUnit = scrUnit1 |
./eesupp/src/open_copy_data_file.F |
135 |
OPEN_COPY_DATA_FILE |
REWIND(iUnit) |
./eesupp/src/open_copy_data_file.F |
35 |
OPEN_COPY_DATA_FILE |
INTEGER iUnit |
./pkg/cost/cost_readparms.F |
36 |
COST_READPARMS |
integer iUnit |
./pkg/cost/cost_readparms.F |
87 |
COST_READPARMS |
O iUnit, |
./pkg/cost/cost_readparms.F |
90 |
COST_READPARMS |
READ( iUnit, nml = cost_nml ) |
./pkg/cost/cost_readparms.F |
96 |
COST_READPARMS |
CLOSE( iUnit ) |
./pkg/ctrl/ctrl_readparms.F |
361 |
CTRL_READPARMS |
O iUnit, |
./pkg/ctrl/ctrl_readparms.F |
364 |
CTRL_READPARMS |
READ(unit = iUnit, nml = ctrl_nml) |
./pkg/ctrl/ctrl_readparms.F |
365 |
CTRL_READPARMS |
READ(unit = iUnit, nml = ctrl_packnames) |
./pkg/ctrl/ctrl_readparms.F |
372 |
CTRL_READPARMS |
CLOSE( iUnit ) |
./pkg/ctrl/ctrl_readparms.F |
48 |
CTRL_READPARMS |
integer iUnit |
./pkg/ctrl/optim_readparms.F |
41 |
OPTIM_READPARMS |
integer iUnit |
./pkg/ctrl/optim_readparms.F |
82 |
OPTIM_READPARMS |
O iUnit, |
./pkg/ctrl/optim_readparms.F |
85 |
OPTIM_READPARMS |
READ(unit = iUnit, nml = optim) |
./pkg/ctrl/optim_readparms.F |
92 |
OPTIM_READPARMS |
CLOSE( iUnit ) |
./pkg/dic/dic_init_fixed.F |
33 |
DIC_INIT_FIXED |
INTEGER iUnit |
./pkg/dic/dic_init_fixed.F |
70 |
DIC_INIT_FIXED |
CALL MDSFINDUNIT( iUnit, mythid ) |
./pkg/dic/dic_init_fixed.F |
71 |
DIC_INIT_FIXED |
OPEN(UNIT=iUnit,FILE='co2atmos.dat',STATUS='old') |
./pkg/dic/dic_init_fixed.F |
73 |
DIC_INIT_FIXED |
READ(iUnit,*) co2atmos(k) |
./pkg/dic/dic_init_fixed.F |
76 |
DIC_INIT_FIXED |
CLOSE(iUnit) |
./pkg/dic/dic_init_fixed.F |
93 |
DIC_INIT_FIXED |
iUnit = standardMessageUnit |
./pkg/dic/dic_init_fixed.F |
95 |
DIC_INIT_FIXED |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_init_fixed.F |
97 |
DIC_INIT_FIXED |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_init_fixed.F |
99 |
DIC_INIT_FIXED |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_readparms.F |
147 |
DIC_READPARMS |
O iUnit, myThid ) |
./pkg/dic/dic_readparms.F |
152 |
DIC_READPARMS |
READ(UNIT=iUnit,NML=ABIOTIC_PARMS) |
./pkg/dic/dic_readparms.F |
156 |
DIC_READPARMS |
READ(UNIT=iUnit,NML=BIOTIC_PARMS) |
./pkg/dic/dic_readparms.F |
160 |
DIC_READPARMS |
READ(UNIT=iUnit,NML=DIC_FORCING) |
./pkg/dic/dic_readparms.F |
168 |
DIC_READPARMS |
CLOSE(iUnit) |
./pkg/dic/dic_readparms.F |
188 |
DIC_READPARMS |
iUnit = standardMessageUnit |
./pkg/dic/dic_readparms.F |
190 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_readparms.F |
192 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_readparms.F |
194 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_readparms.F |
196 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
./pkg/dic/dic_readparms.F |
39 |
DIC_READPARMS |
INTEGER iUnit |
./pkg/down_slope/dwnslp_readparms.F |
41 |
DWNSLP_READPARMS |
INTEGER iUnit |
./pkg/down_slope/dwnslp_readparms.F |
52 |
DWNSLP_READPARMS |
O iUnit, |
./pkg/down_slope/dwnslp_readparms.F |
63 |
DWNSLP_READPARMS |
READ(UNIT=iUnit,NML=DWNSLP_PARM01) |
./pkg/down_slope/dwnslp_readparms.F |
71 |
DWNSLP_READPARMS |
CLOSE(iUnit) |
./pkg/ebm/ebm_readparms.F |
33 |
EBM_READPARMS |
INTEGER errIO, iUnit |
./pkg/ebm/ebm_readparms.F |
49 |
EBM_READPARMS |
O iUnit, myThid ) |
./pkg/ebm/ebm_readparms.F |
60 |
EBM_READPARMS |
READ(UNIT=iUnit,NML=EBM_PARM01,IOSTAT=errIO) |
./pkg/ebm/ebm_readparms.F |
78 |
EBM_READPARMS |
CLOSE(iUnit) |
./pkg/ecco/ecco_readparms.F |
379 |
ECCO_READPARMS |
O iUnit, |
./pkg/ecco/ecco_readparms.F |
382 |
ECCO_READPARMS |
READ( iUnit, nml = ecco_cost_nml ) |
./pkg/ecco/ecco_readparms.F |
38 |
ECCO_READPARMS |
INTEGER k, iUnit, num_file, num_var |
./pkg/ecco/ecco_readparms.F |
464 |
ECCO_READPARMS |
READ( iUnit, nml = ecco_gencost_nml ) |
./pkg/ecco/ecco_readparms.F |
509 |
ECCO_READPARMS |
CLOSE( iUnit ) |
./pkg/exch2/w2_readparms.F |
108 |
W2_READPARMS |
O iUnit, |
./pkg/exch2/w2_readparms.F |
112 |
W2_READPARMS |
READ(UNIT=iUnit,NML=W2_EXCH2_PARM01) |
./pkg/exch2/w2_readparms.F |
117 |
W2_READPARMS |
CLOSE(iUnit) |
./pkg/exch2/w2_readparms.F |
37 |
W2_READPARMS |
INTEGER i, j, iUnit, stdUnit, errCnt |
./pkg/exf/exf_readparms.F |
63 |
EXF_READPARMS |
integer iUnit |
./pkg/exf/exf_readparms.F |
773 |
EXF_READPARMS |
O iUnit, |
./pkg/exf/exf_readparms.F |
780 |
EXF_READPARMS |
READ( iUnit, nml = EXF_NML_01 ) |
./pkg/exf/exf_readparms.F |
785 |
EXF_READPARMS |
READ( iUnit, nml = EXF_NML_02 ) |
./pkg/exf/exf_readparms.F |
790 |
EXF_READPARMS |
READ( iUnit, nml = EXF_NML_03 ) |
./pkg/exf/exf_readparms.F |
795 |
EXF_READPARMS |
READ( iUnit, nml = EXF_NML_04 ) |
./pkg/exf/exf_readparms.F |
802 |
EXF_READPARMS |
READ( iUnit, nml = EXF_NML_SGRUNOFF ) |
./pkg/exf/exf_readparms.F |
810 |
EXF_READPARMS |
READ( iUnit, nml = EXF_NML_OBCS ) |
./pkg/exf/exf_readparms.F |
832 |
EXF_READPARMS |
CLOSE( iUnit ) |