| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_write_state.F |
58 |
FIZHI_WRITE_STATE |
prec = writeBinaryPrec |
|
./model/inc/PARAMS.h |
197 |
NO PROCEDURE |
& writeBinaryPrec, readBinaryPrec, |
|
./model/inc/PARAMS.h |
217 |
NO PROCEDURE |
INTEGER writeBinaryPrec |
|
./pkg/flt/flt_traj.F |
60 |
FLT_TRAJ |
fp = writeBinaryPrec |
|
./pkg/flt/flt_up.F |
53 |
FLT_UP |
fp = writeBinaryPrec |
|
./pkg/gmredi/gmredi_output.F |
159 |
GMREDI_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/gmredi/gmredi_output.F |
80 |
GMREDI_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/kpp/kpp_output.F |
162 |
KPP_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/kpp/kpp_output.F |
316 |
KPP_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/land/land_output.F |
117 |
LAND_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/land/land_output.F |
215 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
217 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
219 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
234 |
LAND_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/layers/layers_output.F |
58 |
LAYERS_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/mom_vecinv/mom_vecinv.F |
144 |
MOM_VECINV |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/my82/my82_output.F |
105 |
MY82_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/my82/my82_output.F |
190 |
MY82_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/obcs/obcs_output.F |
96 |
OBCS_OUTPUT |
prec = writeBinaryPrec |
|
./pkg/ocn_compon_interf/cpl_output.F |
117 |
CPL_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./model/src/config_summary.F |
441 |
CONFIG_SUMMARY |
CALL WRITE_0D_I(writeBinaryPrec, INDEX_NONE, 'writeBinaryPrec =', |
|
./pkg/ptracers/ptracers_write_state.F |
62 |
PTRACERS_WRITE_STATE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/ptracers/ptracers_write_timeave.F |
81 |
PTRACERS_WRITE_TIMEAVE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/rw/write_fld_3d_rl.F |
54 |
WRITE_FLD_3D_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_3d_rs.F |
54 |
WRITE_FLD_3D_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_s3d_rl.F |
99 |
WRITE_FLD_S3D_RL |
fPrec = writeBinaryPrec |
|
./pkg/rw/write_fld_s3d_rs.F |
99 |
WRITE_FLD_S3D_RS |
fPrec = writeBinaryPrec |
|
./pkg/rw/write_fld_xy_rl.F |
52 |
WRITE_FLD_XY_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xy_rs.F |
52 |
WRITE_FLD_XY_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xyz_rl.F |
52 |
WRITE_FLD_XYZ_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xyz_rs.F |
52 |
WRITE_FLD_XYZ_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_glvec_rl.F |
64 |
WRITE_GLVEC_RL |
I fullName, writeBinaryPrec, ioUnit, |
|
./pkg/rw/write_glvec_rs.F |
64 |
WRITE_GLVEC_RS |
I fullName, writeBinaryPrec, ioUnit, |
|
./pkg/rw/write_local_rl.F |
83 |
WRITE_LOCAL_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_local_rl.F |
89 |
WRITE_LOCAL_RL |
I fullName, writeBinaryPrec, globalFile, |
|
./pkg/rw/write_local_rs.F |
83 |
WRITE_LOCAL_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_local_rs.F |
89 |
WRITE_LOCAL_RS |
I fullName, writeBinaryPrec, globalFile, |
|
./pkg/rw/write_rec.F |
136 |
WRITE_REC_XY_RS |
I fName, writeBinaryPrec, |
|
./pkg/rw/write_rec.F |
200 |
WRITE_REC_XY_RL |
I fName, writeBinaryPrec, |
|
./pkg/rw/write_rec.F |
264 |
WRITE_REC_XYZ_RS |
I fName, writeBinaryPrec, |
|
./pkg/rw/write_rec.F |
328 |
WRITE_REC_XYZ_RL |
I fName, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
102 |
SEAICE_AD_DUMP |
& 'ADJvice.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
82 |
SEAICE_AD_DUMP |
writeBinaryPrec = writeStatePrec |
|
./pkg/seaice/seaice_ad_dump.F |
88 |
SEAICE_AD_DUMP |
& 'ADJarea.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
91 |
SEAICE_AD_DUMP |
& 'ADJheff.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
94 |
SEAICE_AD_DUMP |
& 'ADJhsnow.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
99 |
SEAICE_AD_DUMP |
& 'ADJuice.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_obcs_output.F |
61 |
SEAICE_OBCS_OUTPUT |
prec = writeBinaryPrec |
|
./pkg/seaice/seaice_output.F |
224 |
SEAICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/seaice/seaice_output.F |
73 |
SEAICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/shelfice/shelfice_output.F |
154 |
SHELFICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/shelfice/shelfice_output.F |
63 |
SHELFICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/thsice/thsice_output.F |
221 |
THSICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/thsice/thsice_output.F |
345 |
THSICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/timeave/timeave_statv_write.F |
222 |
TIMEAVE_STATV_WRITE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./verification/OpenAD/code_oad_all/the_model_main.F |
650 |
THE_MODEL_MAIN |
tmpprec = writeBinaryPrec |
|
./verification/OpenAD/code_oad_all/the_model_main.F |
651 |
THE_MODEL_MAIN |
writeBinaryPrec = ctrlprec |
|
./verification/OpenAD/code_oad_all/the_model_main.F |
660 |
THE_MODEL_MAIN |
writeBinaryPrec = tmpprec |
|
./verification/OpenAD/code_oad_all/write_state.F |
160 |
WRITE_STATE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
78 |
ADDUMMY_IN_STEPPING |
writeBinaryPrec = writeStatePrec |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
104 |
ADDUMMY_IN_HFAC |
writeBinaryPrec = writeStatePrec |
|
./model/src/ini_parms.F |
196 |
INI_PARMS |
& writeBinaryPrec, readBinaryPrec, writeStatePrec, |
|
./model/src/set_defaults.F |
299 |
SET_DEFAULTS |
writeBinaryPrec = precFloat32 |
|
./model/src/write_state.F |
160 |
WRITE_STATE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_diagnostics.F |
122 |
AIM_DIAGNOSTICS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_diagnostics.F |
224 |
AIM_DIAGNOSTICS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_write_tave.F |
124 |
AIM_WRITE_TAVE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/autodiff/addummy_in_stepping.F |
150 |
ADDUMMY_IN_STEPPING |
writeBinaryPrec = writeStatePrec |
|
./pkg/autodiff/g_dummy_in_stepping.F |
80 |
G_DUMMY_IN_STEPPING |
writeBinaryPrec = writeStatePrec |
|
./pkg/diagnostics/diagnostics_out.F |
466 |
DIAGNOSTICS_OUT |
prec = writeBinaryPrec |
|
./pkg/diagnostics/diagnostics_out.F |
592 |
DIAGNOSTICS_OUT |
IF ( ((writeBinaryPrec .EQ. precFloat32) |
|
./pkg/diagnostics/diagnostics_out.F |
597 |
DIAGNOSTICS_OUT |
ELSEIF ( (writeBinaryPrec .EQ. precFloat64) |
|
./pkg/dic/dic_biotic_diags.F |
104 |
DIC_BIOTIC_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/ecco/cost_drift.F |
240 |
COST_DRIFT |
& writeBinaryPrec, globalfiles, 'RL', Nr, |
|
./pkg/ecco/cost_drift.F |
270 |
COST_DRIFT |
& writeBinaryPrec, globalfiles, 'RL', Nr, |
|
./pkg/ecco/cost_salt.F |
215 |
COST_SALT |
& writeBinaryPrec, globalfiles, 'RL', Nr, |
|
./pkg/ecco/cost_theta.F |
214 |
COST_THETA |
& writeBinaryPrec, globalfiles, 'RL', Nr, |
|
./pkg/exf/exf_ad_dump.F |
101 |
EXF_AD_DUMP |
& 'ADJlwflux.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
104 |
EXF_AD_DUMP |
& 'ADJprecip.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
109 |
EXF_AD_DUMP |
& 'ADJuwind.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
112 |
EXF_AD_DUMP |
& 'ADJvwind.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
117 |
EXF_AD_DUMP |
& 'ADJswdown.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
120 |
EXF_AD_DUMP |
& 'ADJlwdown.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
78 |
EXF_AD_DUMP |
writeBinaryPrec = writeStatePrec |
|
./pkg/exf/exf_ad_dump.F |
81 |
EXF_AD_DUMP |
& 'ADJhflux.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
84 |
EXF_AD_DUMP |
& 'ADJsflux.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
87 |
EXF_AD_DUMP |
& 'ADJustress.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
90 |
EXF_AD_DUMP |
& 'ADJvstress.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
95 |
EXF_AD_DUMP |
& 'ADJatemp.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
98 |
EXF_AD_DUMP |
& 'ADJaqh.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_adjoint_snapshots__g.F |
81 |
G_EXF_ADJOINT_SNAPSHOTS |
writeBinaryPrec = writeStatePrec |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
85 |
ADEXF_ADJOINT_SNAPSHOTS |
writeBinaryPrec = writeStatePrec |