| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_ad_dump.F |
102 |
EXF_AD_DUMP |
& 'ADJaqh.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
105 |
EXF_AD_DUMP |
& 'ADJlwflux.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
108 |
EXF_AD_DUMP |
& 'ADJprecip.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
113 |
EXF_AD_DUMP |
& 'ADJuwind.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
116 |
EXF_AD_DUMP |
& 'ADJvwind.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
121 |
EXF_AD_DUMP |
& 'ADJswdown.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
124 |
EXF_AD_DUMP |
& 'ADJlwdown.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
85 |
EXF_AD_DUMP |
& 'ADJhflux.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
88 |
EXF_AD_DUMP |
& 'ADJsflux.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
91 |
EXF_AD_DUMP |
& 'ADJustress.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
94 |
EXF_AD_DUMP |
& 'ADJvstress.'//suff, writeBinaryPrec, 1, |
|
./pkg/exf/exf_ad_dump.F |
99 |
EXF_AD_DUMP |
& 'ADJatemp.'//suff, writeBinaryPrec, 1, |
|
./model/inc/PARAMS.h |
202 |
NO PROCEDURE |
& writeBinaryPrec, readBinaryPrec, |
|
./model/inc/PARAMS.h |
224 |
NO PROCEDURE |
INTEGER writeBinaryPrec |
|
./pkg/fizhi/fizhi_write_state.F |
58 |
FIZHI_WRITE_STATE |
prec = writeBinaryPrec |
|
./pkg/flt/flt_traj.F |
172 |
FLT_TRAJ |
fp = writeBinaryPrec |
|
./pkg/flt/flt_up.F |
170 |
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 |
116 |
LAND_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/land/land_output.F |
210 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
212 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
214 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
229 |
LAND_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/mom_vecinv/mom_vecinv.F |
168 |
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 |
|
./model/src/config_summary.F |
544 |
CONFIG_SUMMARY |
CALL WRITE_0D_I(writeBinaryPrec, INDEX_NONE, 'writeBinaryPrec =', |
|
./pkg/obcs/obcs_output.F |
99 |
OBCS_OUTPUT |
prec = writeBinaryPrec |
|
./pkg/ocn_compon_interf/cpl_output.F |
117 |
CPL_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/openad/the_model_main.F |
480 |
THE_MODEL_MAIN |
tmpprec = writeBinaryPrec |
|
./pkg/openad/the_model_main.F |
481 |
THE_MODEL_MAIN |
writeBinaryPrec = ctrlprec |
|
./pkg/openad/the_model_main.F |
569 |
THE_MODEL_MAIN |
writeBinaryPrec = tmpprec |
|
./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 |
103 |
SEAICE_AD_DUMP |
& 'ADJuice.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
106 |
SEAICE_AD_DUMP |
& 'ADJvice.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
114 |
SEAICE_AD_DUMP |
& 'ADJarea', writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
117 |
SEAICE_AD_DUMP |
& 'ADJheff', writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
120 |
SEAICE_AD_DUMP |
& 'ADJhsnow', writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
125 |
SEAICE_AD_DUMP |
& 'ADJuice', writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
128 |
SEAICE_AD_DUMP |
& 'ADJvice', writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
92 |
SEAICE_AD_DUMP |
& 'ADJarea.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
95 |
SEAICE_AD_DUMP |
& 'ADJheff.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_ad_dump.F |
98 |
SEAICE_AD_DUMP |
& 'ADJhsnow.'//suff, writeBinaryPrec, |
|
./pkg/seaice/seaice_obcs_output.F |
62 |
SEAICE_OBCS_OUTPUT |
prec = writeBinaryPrec |
|
./pkg/seaice/seaice_output.F |
272 |
SEAICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/seaice/seaice_output.F |
81 |
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/streamice/streamice_dump_ad.F |
107 |
ADSTREAMICE_DUMP |
writeBinaryPrec = writeStatePrec |
|
./pkg/streamice/streamice_dump_ad.F |
113 |
ADSTREAMICE_DUMP |
& 'ADJc_basal_friction.'//suff, writeBinaryPrec, |
|
./pkg/streamice/streamice_dump_ad.F |
116 |
ADSTREAMICE_DUMP |
& 'ADJh_streamice.'//suff, writeBinaryPrec, |
|
./pkg/streamice/streamice_dump_ad.F |
120 |
ADSTREAMICE_DUMP |
& 'ADJr_low.'//suff, writeBinaryPrec, |
|
./pkg/streamice/streamice_dump_ad.F |
124 |
ADSTREAMICE_DUMP |
& 'ADJb_glen.'//suff, writeBinaryPrec, |
|
./pkg/streamice/streamice_dump_ad.F |
127 |
ADSTREAMICE_DUMP |
& 'ADJbdot.'//suff, writeBinaryPrec, |
|
./pkg/thsice/thsice_output.F |
183 |
THSICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/thsice/thsice_output.F |
305 |
THSICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/timeave/timeave_statv_write.F |
222 |
TIMEAVE_STATV_WRITE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./model/src/ini_parms.F |
214 |
INI_PARMS |
& writeBinaryPrec, readBinaryPrec, writeStatePrec, |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
79 |
ADDUMMY_IN_STEPPING |
writeBinaryPrec = writeStatePrec |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
100 |
ADDUMMY_IN_HFAC |
writeBinaryPrec = writeStatePrec |
|
./model/src/set_defaults.F |
334 |
SET_DEFAULTS |
writeBinaryPrec = precFloat32 |
|
./model/src/write_state.F |
176 |
WRITE_STATE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_diagnostics.F |
124 |
AIM_DIAGNOSTICS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_diagnostics.F |
226 |
AIM_DIAGNOSTICS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_write_tave.F |
124 |
AIM_WRITE_TAVE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
393 |
DIAGNOSTICS_MNC_OUT |
IF ( ((writeBinaryPrec .EQ. precFloat32).AND. |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
398 |
DIAGNOSTICS_MNC_OUT |
ELSEIF ( (writeBinaryPrec .EQ. precFloat64) |
|
./pkg/diagnostics/diagnostics_out.F |
391 |
DIAGNOSTICS_OUT |
prec = writeBinaryPrec |
|
./pkg/dic/dic_biotic_diags.F |
104 |
DIC_BIOTIC_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |