File |
Line number |
Procedure |
Code |
./pkg/exf/exf_adjoint_snapshots_ad.F |
170 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJustress', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
172 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJvstress', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
174 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJhflux', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
176 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJsflux', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
182 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJatemp', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
184 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJaqh', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
186 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJprecip', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
190 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJrunoff', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
195 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJuwind', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
197 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJvwind', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
202 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJswdown', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
204 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJlwdown', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
208 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJclimsst', |
./pkg/exf/exf_adjoint_snapshots_ad.F |
212 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_REC_XY_RL ( 'ADJclimsss', |
./pkg/exf/exf_set_fld.F |
213 |
EXF_SET_FLD |
& CALL WRITE_REC_XY_RL( out_file, fld1, 1, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
214 |
EXF_SET_FLD |
CALL WRITE_REC_XY_RL( out_file,fld1,count0,myIter,myThid ) |
./pkg/exf/exf_set_fld.F |
271 |
EXF_SET_FLD |
CALL WRITE_REC_XY_RL( out_file,fld1,count1,myIter,myThid ) |
./pkg/exf/exf_set_uv.F |
267 |
EXF_SET_UV |
& CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
268 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,count0,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
272 |
EXF_SET_UV |
& CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
273 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,count0,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
431 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,count1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
434 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,count1,myIter,myThid) |
./pkg/kpp/kpp_output.F |
143 |
KPP_OUTPUT |
CALL WRITE_REC_XY_RL('KPPhbl',KPPhbl,kpp_drctrec, |
./pkg/kpp/kpp_output.F |
301 |
KPP_OUTPUT |
CALL WRITE_REC_XY_RL('KPPhbl-T',KPPhbltave, |
./pkg/land/land_output.F |
226 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_sTtave, k+1, myIter, myThid ) |
./pkg/land/land_output.F |
227 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_hStave, k+2, myIter, myThid ) |
./pkg/land/land_output.F |
228 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_sAtave, k+3, myIter, myThid ) |
./pkg/land/land_output.F |
229 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_ROftave, k+4, myIter, myThid ) |
./pkg/land/land_output.F |
230 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_eROtave, k+5, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
100 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, TYtave , 5, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
101 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, FWtave , 6, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
102 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SFxtave , 7, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
103 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SICtave , 8, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
104 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, MXLtave , 9, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
105 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SSTtave , 10, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
106 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SSStave , 11, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
107 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, vSqtave , 12, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
110 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, aCO2tave , 13, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
111 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, sWSpdtave, 14, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
112 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, iceftave , 15, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
113 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, fCO2tave , 16, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
96 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SLPtave , 1, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
97 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, HFtave , 2, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
98 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, QSWtave , 3, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
99 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, TXtave , 4, myIter, myThid ) |
./pkg/rw/write_rec.F |
148 |
WRITE_REC_XY_RL |
SUBROUTINE WRITE_REC_XY_RL( fName,field,iRec,myIter,myThid ) |
./pkg/seaice/seaice_ad_dump.F |
157 |
SEAICE_AD_DUMP |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJarea', |
./pkg/seaice/seaice_ad_dump.F |
162 |
SEAICE_AD_DUMP |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJheff', |
./pkg/seaice/seaice_ad_dump.F |
167 |
SEAICE_AD_DUMP |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJhsnow', |
./pkg/seaice/seaice_ad_dump.F |
175 |
SEAICE_AD_DUMP |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJuice', |
./pkg/seaice/seaice_ad_dump.F |
179 |
SEAICE_AD_DUMP |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJvice', |
./pkg/thsice/thsice_output.F |
158 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_fract_Ave, 1, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
159 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_iceH_Ave, 2, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
160 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_snowH_Ave, 3, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
161 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_Tsrf_Ave, 4, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
162 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_Tice1_Ave, 5, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
163 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_Tice2_Ave, 6, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
165 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_albedo_Ave, 7, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
166 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_flx2oc_Ave, 8, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
167 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_frw2oc_Ave, 9, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
169 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_salFx_Ave, kl, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
172 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_flxAtm_Ave,kl, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
174 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_frwAtm_Ave,kl, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
178 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_tMxL_Ave, kl, myIter, myThid ) |
./pkg/thsice/thsice_output.F |
180 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_sMxL_Ave, kl, myIter, myThid ) |
./pkg/zonal_filt/zonal_filt_init.F |
120 |
ZONAL_FILT_INIT |
CALL WRITE_REC_XY_RL( 'ampFactor', ampFactor, 1, 0, myThid ) |
./model/src/write_state.F |
108 |
WRITE_STATE |
CALL WRITE_REC_XY_RL('Eta',etaN,iRec,myIter,myThid) |
./pkg/aim_v23/aim_write_tave.F |
169 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, USTRtave, 1, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
170 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, VSTRtave, 2, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
171 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, TSRtave , 3, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
172 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, OLRtave , 4, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
173 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, SSRtave , 5, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
174 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, SLRtave , 6, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
175 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, SHFtave , 7, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
176 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, EVAPtave, 8, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
177 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, PRECNVtave, 9, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
178 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, PRECLStave, 10, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
179 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, CLOUDCtave, 11, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
180 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, CLTOPtave, 12, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
181 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, CBMFtave, 13, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
182 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, DRAGtave, 14, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
183 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, aimV0tave, 15, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
184 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, aimT0tave, 16, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
185 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, aimQ0tave, 17, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
186 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, EnFxPrtave, 18, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
187 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, albedotave, 19, myIter, myThid ) |
./pkg/aim_v23/aim_write_tave.F |
188 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, dTsurftave, 20, myIter, myThid ) |
./pkg/autodiff/addummy_in_stepping.F |
268 |
ADDUMMY_IN_STEPPING |
CALL WRITE_REC_XY_RL ( 'ADJetan', |
./pkg/autodiff/addummy_in_stepping.F |
319 |
ADDUMMY_IN_STEPPING |
CALL WRITE_REC_XY_RL ( 'ADJbottomdrag', |
./pkg/autodiff/addummy_in_stepping.F |
353 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJetan', |
./pkg/autodiff/addummy_in_stepping.F |
361 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJtaux', |
./pkg/autodiff/addummy_in_stepping.F |
365 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJtauy', |
./pkg/autodiff/addummy_in_stepping.F |
370 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJqnet', |
./pkg/autodiff/addummy_in_stepping.F |
375 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJempr', |
./pkg/autodiff/addummy_in_stepping.F |
381 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJqsw', |
./pkg/autodiff/addummy_in_stepping.F |
429 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJsst', |
./pkg/autodiff/addummy_in_stepping.F |
436 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJsss', |
./pkg/autodiff/addummy_in_stepping.F |
444 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJbottomdrag', |
./pkg/autodiff/addummy_in_stepping.F |
551 |
ADDUMMY_IN_STEPPING |
CALL WRITE_REC_XY_RL ( 'ADJetan', |
./pkg/autodiff/addummy_in_stepping.F |
616 |
ADDUMMY_IN_STEPPING |
CALL WRITE_REC_XY_RL ( 'ADJbottomdrag', |
./pkg/autodiff/addummy_in_stepping.F |
651 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJetan', |
./pkg/autodiff/addummy_in_stepping.F |
659 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJtaux', |
./pkg/autodiff/addummy_in_stepping.F |
663 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJtauy', |
./pkg/autodiff/addummy_in_stepping.F |
668 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJqnet', |
./pkg/autodiff/addummy_in_stepping.F |
673 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJempr', |
./pkg/autodiff/addummy_in_stepping.F |
727 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJsst', |
./pkg/autodiff/addummy_in_stepping.F |
734 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJsss', |
./pkg/autodiff/addummy_in_stepping.F |
742 |
ADDUMMY_IN_STEPPING |
IF ( dumpAdByRec ) CALL WRITE_REC_XY_RL( 'ADJbottomdrag', |
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
184 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
249 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenTmp, xx_gen, iRec, 1, myThid ) |
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
281 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, kRec, 1, myThid ) |
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
349 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
./pkg/ecco/cost_averagesgeneric.F |
141 |
COST_AVERAGESGENERIC |
CALL WRITE_REC_XY_RL( fname, localbar, locrec, 1, myThid ) |
./pkg/ecco/cost_averagesgeneric.F |
191 |
COST_AVERAGESGENERIC |
CALL WRITE_REC_XY_RL( fname, localbar, locrec, 1, myThid ) |
./pkg/ecco/cost_generic.F |
394 |
COST_GENLOOP |
& WRITE_REC_XY_RL( fname3, localdif,irec, eccoiter, mythid ) |
./pkg/ecco/cost_generic.F |
421 |
COST_GENLOOP |
& WRITE_REC_XY_RL(fname3,localdifmeanOut,1,eccoiter,mythid) |
./pkg/ecco/cost_generic.F |
430 |
COST_GENLOOP |
& WRITE_REC_XY_RL( fname3, localweight,irec, eccoiter, mythid ) |