Symbol Description Uses
writeBinaryPrec Precision used for writing binary files 114


File Line number Procedure Code
./pkg/ptracers/ptracers_write_state.F 55 PTRACERS_WRITE_STATE 
        IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./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 174 NO PROCEDURE 
     &        writeBinaryPrec, readBinaryPrec,
./model/inc/PARAMS.h 191 NO PROCEDURE 
      INTEGER writeBinaryPrec
./pkg/gmredi/gmredi_output.F 50 GMREDI_OUTPUT 
      IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./pkg/diagnostics/diagnostics_out.F 346 DIAGNOSTICS_OUT 
              CALL MDSWRITEFIELD_NEW(fn,writeBinaryPrec,glf,.FALSE.,
./pkg/diagnostics/diagnostics_out.F 440 DIAGNOSTICS_OUT 
            IF ( ( (writeBinaryPrec .EQ. precFloat32)
./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/aim_v23/aim_write_tave.F 159 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 161 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 163 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 165 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 167 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 169 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 171 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 173 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 175 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 177 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 179 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 181 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 183 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 185 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 187 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 189 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 191 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 193 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 195 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/aim_v23/aim_write_tave.F 197 AIM_WRITE_TAVE 
         CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/autodiff/g_dummy_in_stepping.F 78 G_DUMMY_IN_STEPPING 
        writeBinaryPrec = writeStatePrec
./pkg/autodiff/addummy_in_stepping.F 116 ADDUMMY_IN_STEPPING 
        writeBinaryPrec = writeStatePrec
./pkg/autodiff/addummy_in_stepping.F 177 ADDUMMY_IN_STEPPING 
     &       'ADJarea', writeBinaryPrec, globalFiles, 'RL',
./pkg/autodiff/addummy_in_stepping.F 180 ADDUMMY_IN_STEPPING 
     &       'ADJheff', writeBinaryPrec, globalFiles, 'RL',
./pkg/autodiff/addummy_in_stepping.F 183 ADDUMMY_IN_STEPPING 
     &       'ADJhsnow', writeBinaryPrec, globalFiles, 'RL',
./pkg/autodiff/addummy_in_stepping.F 187 ADDUMMY_IN_STEPPING 
     &       'ADJuice', writeBinaryPrec, globalFiles, 'RL',
./pkg/autodiff/addummy_in_stepping.F 190 ADDUMMY_IN_STEPPING 
     &       'ADJvice', writeBinaryPrec, globalFiles, 'RL',
./pkg/dic/dic_biotic_diags.F 43 DIC_BIOTIC_DIAGS 
      IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./verification/rotating_tank/code/checkpoint.F 273 WRITE_CHECKPOINT 
        oldPrec = writeBinaryPrec
./verification/rotating_tank/code/checkpoint.F 274 WRITE_CHECKPOINT 
        writeBinaryPrec = precFloat64
./verification/rotating_tank/code/checkpoint.F 353 WRITE_CHECKPOINT 
        writeBinaryPrec = oldPrec
./model/src/write_grid.F 103 WRITE_GRID 
        CALL MDSWRITEVEC_LOC_RS('RC', writeBinaryPrec, Nr, rC,
./model/src/write_grid.F 105 WRITE_GRID 
        CALL MDSWRITEVEC_LOC_RS('RF', writeBinaryPrec,1+Nr, rF,
./model/src/write_grid.F 107 WRITE_GRID 
        CALL MDSWRITEVEC_LOC_RS('DRC',writeBinaryPrec, Nr, drC,
./model/src/write_grid.F 109 WRITE_GRID 
        CALL MDSWRITEVEC_LOC_RS('DRF',writeBinaryPrec, Nr, drF,
./model/src/ini_parms.F 187 INI_PARMS 
     & writeBinaryPrec, readBinaryPrec, writeStatePrec,
./model/src/checkpoint.F 482 WRITE_CHECKPOINT_NOW 
        oldPrec = writeBinaryPrec
./model/src/checkpoint.F 483 WRITE_CHECKPOINT_NOW 
        writeBinaryPrec = precFloat64
./model/src/checkpoint.F 507 WRITE_CHECKPOINT_NOW 
        writeBinaryPrec = oldPrec
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 77 ADDUMMY_IN_STEPPING 
        writeBinaryPrec = writeStatePrec
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 101 ADDUMMY_IN_HFAC 
        writeBinaryPrec = writeStatePrec
./model/src/write_state.F 160 WRITE_STATE 
          IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./model/src/config_summary.F 372 CONFIG_SUMMARY 
      CALL WRITE_0D_I(writeBinaryPrec, INDEX_NONE, 'writeBinaryPrec =',
./model/src/set_defaults.F 272 SET_DEFAULTS 
      writeBinaryPrec   = precFloat32
./pkg/kpp/kpp_do_diags.F 72 KPP_DO_DIAGS 
      IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./pkg/rw/write_local_rs.F 51 WRITE_LOCAL_RS 
     &     fullName, writeBinaryPrec, globalFile,
./pkg/rw/write_fld_xyz_rs.F 48 WRITE_FLD_XYZ_RS 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/write_local_rl.F 56 WRITE_LOCAL_RL 
     &        fullName, writeBinaryPrec, globalFile,
./pkg/rw/write_local_rl.F 60 WRITE_LOCAL_RL 
     &        fullName, writeBinaryPrec, globalFile,
./pkg/rw/write_fld_xy_rs.F 48 WRITE_FLD_XY_RS 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/read_write_rec.F 506 WRITE_REC_XY_RS 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/read_write_rec.F 562 WRITE_REC_XY_RL 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/read_write_rec.F 618 WRITE_REC_XYZ_RS 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/read_write_rec.F 674 WRITE_REC_XYZ_RL 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/write_fld_xy_rl.F 48 WRITE_FLD_XY_RL 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/rw/write_fld_xyz_rl.F 48 WRITE_FLD_XYZ_RL 
      CALL MDSWRITEFIELD( fullName, writeBinaryPrec, globalFile,
./pkg/timeave/timeave_statv_write.F 220 TIMEAVE_STATV_WRITE 
          IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./pkg/ocn_compon_interf/cpl_write_diags.F 100 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 102 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 104 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 106 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 108 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 110 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 46 CPL_WRITE_DIAGS 
      IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./pkg/ocn_compon_interf/cpl_write_diags.F 88 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 90 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 92 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 94 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 96 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ocn_compon_interf/cpl_write_diags.F 98 CPL_WRITE_DIAGS 
          CALL MDSWRITEFIELD(fn, writeBinaryPrec, gf, 'RL',
./pkg/ecco/cost_theta.F 213 COST_THETA 
     &           writeBinaryPrec, globalfiles, 'RL', Nr,
./pkg/ecco/cost_drift.F 239 COST_DRIFT 
     &         writeBinaryPrec, globalfiles, 'RL', Nr,
./pkg/ecco/cost_drift.F 269 COST_DRIFT 
     &         writeBinaryPrec, globalfiles, 'RL', Nr,
./pkg/ecco/cost_salt.F 214 COST_SALT 
     &           writeBinaryPrec, globalfiles, 'RL', Nr,
./pkg/thsice/thsice_output.F 192 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 194 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 196 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 198 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 200 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 202 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 204 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 206 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 208 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 210 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 213 THSICE_OUTPUT 
         CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 217 THSICE_OUTPUT 
           CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 220 THSICE_OUTPUT 
           CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 225 THSICE_OUTPUT 
           CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./pkg/thsice/thsice_output.F 228 THSICE_OUTPUT 
           CALL MDSWRITEFIELD( fn, writeBinaryPrec, gf, 'RL', 1,
./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/mom_vecinv/mom_vecinv.F 144 MOM_VECINV 
        IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./pkg/land/land_do_diags.F 108 LAND_DO_DIAGS 
          IF ( writeBinaryPrec .EQ. precFloat64 ) THEN
./pkg/land/land_write_diags.F 118 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 120 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 122 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 125 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 127 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 129 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 131 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./pkg/land/land_write_diags.F 133 LAND_WRITE_DIAGS 
        CALL MDSWRITEFIELD(fn,writeBinaryPrec,gf,
./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