| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
66 |
PTRACERS_READ_CHECKPOINT |
prec = precFloat64 |
|
./pkg/ptracers/ptracers_write_state.F |
55 |
PTRACERS_WRITE_STATE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/ptracers/ptracers_write_checkpoint.F |
101 |
PTRACERS_WRITE_CHECKPOINT |
prec = precFloat64 |
|
./pkg/ptracers/ptracers_write_timeave.F |
84 |
PTRACERS_WRITE_TIMEAVE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/shelfice/shelfice_do_diags.F |
36 |
SHELFICE_DO_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./model/inc/PARAMS.h |
32 |
NO PROCEDURE |
INTEGER precFloat64 |
|
./model/inc/PARAMS.h |
33 |
NO PROCEDURE |
PARAMETER ( precFloat64 = 64 ) |
|
./pkg/gmredi/gmredi_output.F |
50 |
GMREDI_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
187 |
DIAGNOSTICS_WRITE_PICKUP |
prec = precFloat64 |
|
./pkg/diagnostics/diagnostics_out.F |
342 |
DIAGNOSTICS_OUT |
CALL MDSWRITEFIELD_NEW(fn,precFloat64,glf,.FALSE., |
|
./pkg/diagnostics/diagnostics_out.F |
446 |
DIAGNOSTICS_OUT |
ELSEIF ( (writeBinaryPrec .EQ. precFloat64) |
|
./pkg/aim_v23/aim_diagnostics.F |
55 |
AIM_DIAGNOSTICS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_v23/aim_write_tave.F |
117 |
AIM_WRITE_TAVE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/flt/flt_mdsreadvector.F |
184 |
MDSREADVECTOR_FLT |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/dic/dic_biotic_diags.F |
43 |
DIC_BIOTIC_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/fizhi/fizhi_write_pickup.F |
69 |
FIZHI_WRITE_PICKUP |
prec = precFloat64 |
|
./pkg/fizhi/fizhi_read_pickup.F |
51 |
FIZHI_READ_PICKUP |
prec = precFloat64 |
|
./model/src/packages_write_pickup.F |
142 |
PACKAGES_WRITE_PICKUP_NOW |
prec = precFloat64 |
|
./pkg/cd_code/cd_code_checkpoint.F |
48 |
CD_CODE_READ_CHECKPOINT |
prec = precFloat64 |
|
./verification/rotating_tank/code/checkpoint.F |
108 |
READ_CHECKPOINT |
prec = precFloat64 |
|
./verification/rotating_tank/code/checkpoint.F |
274 |
WRITE_CHECKPOINT |
writeBinaryPrec = precFloat64 |
|
./verification/rotating_tank/code/checkpoint.F |
303 |
WRITE_CHECKPOINT |
prec = precFloat64 |
|
./verification/rotating_tank/code/checkpoint.F |
79 |
READ_CHECKPOINT |
readBinaryPrec = precFloat64 |
|
./model/src/load_grid_spacing.F |
60 |
LOAD_GRID_SPACING |
ELSEIF (readBinaryPrec.EQ.precFloat64) THEN |
|
./model/src/load_grid_spacing.F |
95 |
LOAD_GRID_SPACING |
ELSEIF (readBinaryPrec.EQ.precFloat64) THEN |
|
./verification/OpenAD/code_ad_openad/mds_reclen.F |
33 |
NO PROCEDURE |
elseif (filePrec .EQ. precFloat64) then |
|
./verification/OpenAD/code_ad_openad/mds_reclen.F |
78 |
AD_S_MDS_RECLEN |
elseif (filePrec .EQ. precFloat64) then |
|
./model/src/checkpoint.F |
111 |
READ_CHECKPOINT |
readBinaryPrec = precFloat64 |
|
./model/src/checkpoint.F |
142 |
READ_CHECKPOINT |
prec = precFloat64 |
|
./model/src/checkpoint.F |
483 |
WRITE_CHECKPOINT_NOW |
writeBinaryPrec = precFloat64 |
|
./model/src/checkpoint.F |
511 |
WRITE_CHECKPOINT_NOW |
prec = precFloat64 |
|
./model/src/write_state.F |
160 |
WRITE_STATE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./model/src/set_defaults.F |
271 |
SET_DEFAULTS |
writeStatePrec = precFloat64 |
|
./pkg/ggl90/ggl90_checkpoint.F |
39 |
GGL90_READ_CHECKPOINT |
prec = precFloat64 |
|
./pkg/kpp/kpp_do_diags.F |
72 |
KPP_DO_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
35 |
ATM_CPL_READ_PICKUP |
prec = precFloat64 |
|
./pkg/timeave/timeave_statv_write.F |
220 |
TIMEAVE_STATV_WRITE |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./eesupp/src/mds_reclen.F |
33 |
NO PROCEDURE |
elseif (filePrec .EQ. precFloat64) then |
|
./pkg/obcs/obcs_init_variables.F |
212 |
OBCS_INIT_VARIABLES |
prec = precFloat64 |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
35 |
OCN_CPL_READ_PICKUP |
prec = precFloat64 |
|
./pkg/ocn_compon_interf/cpl_write_diags.F |
46 |
CPL_WRITE_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/mdsio/mdsio_writevector.F |
175 |
MDSWRITEVECTOR |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_writevector.F |
274 |
MDSWRITEVECTOR |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice.F |
199 |
MDSREADFIELDXZ |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice.F |
437 |
MDSREADFIELDYZ |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice.F |
644 |
MDSWRITEFIELDXZ |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice.F |
862 |
MDSWRITEFIELDYZ |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readfield_loc.F |
196 |
MDSREADFIELD_LOC |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_writemeta.F |
91 |
MDSWRITEMETA |
elseif (filePrec .EQ. precFloat64) then |
|
./pkg/mdsio/mdsio_writetile.F |
173 |
MDS_WRITETILE |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readtile.F |
190 |
MDS_READTILE |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
189 |
MDSREADFIELDXZ_LOC |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
418 |
MDSREADFIELDYZ_LOC |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
616 |
MDSWRITEFIELDXZ_LOC |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
825 |
MDSWRITEFIELDYZ_LOC |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readfield.F |
216 |
MDSREADFIELD |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readfield.F |
321 |
MDSREADFIELD |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readfield.F |
477 |
MDSREADFIELD |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readvector.F |
201 |
MDSREADVECTOR |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_readvector.F |
299 |
MDSREADVECTOR |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
1000 |
MDSREADFIELD_2D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
1071 |
MDSREADFIELD_2D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
1290 |
MDSWRITEFIELD_2D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
1384 |
MDSWRITEFIELD_2D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
286 |
MDSREADFIELD_3D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
357 |
MDSREADFIELD_3D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
574 |
MDSWRITEFIELD_3D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl.F |
668 |
MDSWRITEFIELD_3D_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_writelocal.F |
188 |
MDS_WRITELOCAL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
201 |
MDSREADFIELD_XZ_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
423 |
MDSREADFIELD_YZ_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
623 |
MDSWRITEFIELD_XZ_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
838 |
MDSWRITEFIELD_YZ_GL |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_writevec_loc.F |
142 |
MDSWRITEVEC_LOC_RS |
ELSEIF (filePrec .EQ. precFloat64) THEN |
|
./pkg/mdsio/mdsio_writefield_new.F |
230 |
MDSWRITEFIELD_NEW |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_writefield_new.F |
353 |
MDSWRITEFIELD_NEW |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/mdsio/mdsio_writefield_new.F |
438 |
MDSWRITEFIELD_NEW |
elseif (filePrec .eq. precFloat64) then |
|
./pkg/thsice/thsice_output.F |
236 |
THSICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/thsice/thsice_output.F |
360 |
THSICE_OUTPUT |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/thsice/thsice_ini_vars.F |
97 |
THSICE_INI_VARS |
prec=precFloat64 |
|
./pkg/mom_vecinv/mom_vecinv.F |
144 |
MOM_VECINV |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/land/land_write_pickup.F |
66 |
LAND_WRITE_PICKUP |
prec = precFloat64 |
|
./pkg/land/land_read_pickup.F |
49 |
LAND_READ_PICKUP |
prec = precFloat64 |
|
./pkg/land/land_do_diags.F |
108 |
LAND_DO_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/land/land_write_diags.F |
51 |
LAND_WRITE_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/seaice/seaice_do_diags.F |
40 |
SEAICE_DO_DIAGS |
IF ( writeBinaryPrec .EQ. precFloat64 ) THEN |
|
./pkg/seaice/seaice_pickup.F |
44 |
SEAICE_READ_PICKUP |
& ( fn, precFloat64, 'RL', MULTDIM, TICES, 1, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
45 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, YNEG , 8, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
46 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, HSNOW, 9, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
47 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, UICE , 4, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
48 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, VICE , 5, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
49 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, HEFF , 6, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
50 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, AREA , 7, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
53 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, |
|
./pkg/seaice/seaice_pickup.F |
55 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, |
|
./pkg/seaice/seaice_pickup.F |
57 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, |
|
./pkg/seaice/seaice_pickup.F |
62 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, TICE , 1, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
63 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, YNEG , 2, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
64 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, HSNOW, 3, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
65 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, UICE , 2, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
66 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, VICE , 3, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
67 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, HEFF , 4, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
68 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 3, AREA , 5, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
71 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, |
|
./pkg/seaice/seaice_pickup.F |
73 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, |
|
./pkg/seaice/seaice_pickup.F |
75 |
SEAICE_READ_PICKUP |
CALL MDSREADFIELD( fn, precFloat64, 'RL', 1, |