| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_readparms.F |
499 |
ECCO_READPARMS |
cost_iprec = precFloat32 |
|
./pkg/exf/exf_check.F |
56 |
EXF_CHECK |
& (exf_iprec.EQ.precFloat32 .OR. exf_iprec.EQ.precFloat64) |
|
./pkg/mdsio/mdsio_facef_read.F |
121 |
MDS_FACEF_READ_RS |
IF ( fPrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_facef_read.F |
85 |
MDS_FACEF_READ_RS |
IF ( fPrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_gl.F |
1065 |
MDSREADFIELD_2D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
1145 |
MDSREADFIELD_2D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
1395 |
MDSWRITEFIELD_2D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
1488 |
MDSWRITEFIELD_2D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
278 |
MDSREADFIELD_3D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
358 |
MDSREADFIELD_3D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
606 |
MDSWRITEFIELD_3D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl.F |
699 |
MDSWRITEFIELD_3D_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
181 |
MDSREADFIELD_XZ_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
421 |
MDSREADFIELD_YZ_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
644 |
MDSWRITEFIELD_XZ_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
885 |
MDSWRITEFIELD_YZ_GL |
if (filePrec .eq. precFloat32) then |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
57 |
MDS_RD_REC_RL |
IF ( fPrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
57 |
MDS_RD_REC_RS |
IF ( fPrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
296 |
MDS_READ_FIELD |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
314 |
MDS_READ_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
437 |
MDS_READ_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
489 |
MDS_READ_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
515 |
MDS_READ_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
529 |
MDS_READ_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_meta.F |
276 |
MDS_READ_META |
filePrec = precFloat32 |
|
./pkg/mdsio/mdsio_read_meta.F |
291 |
MDS_READ_META |
filePrec = precFloat32 |
|
./pkg/mdsio/mdsio_read_section.F |
225 |
MDS_READ_SEC_XZ |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_section.F |
503 |
MDS_READ_SEC_YZ |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
153 |
MDS_READ_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
171 |
MDS_READ_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
239 |
MDS_READ_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
269 |
MDS_READ_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
279 |
MDS_READ_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
174 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
181 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
193 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
200 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
215 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
222 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_read_whalos.F |
232 |
MDS_READ_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
57 |
MDS_WR_REC_RL |
IF ( fPrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
57 |
MDS_WR_REC_RS |
IF ( fPrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
291 |
MDS_WRITE_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
346 |
MDS_WRITE_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
376 |
MDS_WRITE_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
419 |
MDS_WRITE_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
484 |
MDS_WRITE_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
514 |
MDS_WRITE_FIELD |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_meta.F |
146 |
MDS_WRITE_META |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
196 |
MDS_WRITE_SEC_XZ |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
449 |
MDS_WRITE_SEC_YZ |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_tape.F |
107 |
MDS_WRITE_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_tape.F |
166 |
MDS_WRITE_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_tape.F |
191 |
MDS_WRITE_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_tape.F |
269 |
MDS_WRITE_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_tape.F |
97 |
MDS_WRITE_TAPE |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
146 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
182 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
189 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
200 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
207 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
222 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_write_whalos.F |
229 |
MDS_WRITE_WHALOS |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
222 |
MDS_WRITELOCAL |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
293 |
MDS_WRITELOCAL |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
338 |
MDS_WRITELOCAL |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
368 |
MDS_WRITELOCAL |
IF ( filePrec.EQ.precFloat32 ) THEN |
|
./pkg/openad/ad_s_mds_reclen.F |
32 |
OAD_S_MDS_RECLEN |
if (filePrec .EQ. precFloat32) then |
|
./model/src/set_defaults.F |
353 |
SET_DEFAULTS |
readBinaryPrec = precFloat32 |
|
./model/src/set_defaults.F |
354 |
SET_DEFAULTS |
writeBinaryPrec = precFloat32 |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
93 |
ATM_PHYS_INIT_FIXED |
I precFloat32, precFloat64, |
|
./pkg/autodiff/adread_adwrite.F |
149 |
ADREAD |
filePrec = precFloat32 |
|
./pkg/autodiff/adread_adwrite.F |
348 |
ADWRITE |
filePrec = precFloat32 |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
124 |
AUTODIFF_WHTAPEIO_SYNC |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
131 |
AUTODIFF_WHTAPEIO_SYNC |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
153 |
AUTODIFF_WHTAPEIO_SYNC |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
160 |
AUTODIFF_WHTAPEIO_SYNC |
IF (filePrec .EQ. precFloat32) THEN |
|
./eesupp/src/mds_reclen.F |
31 |
NO PROCEDURE |
IF (filePrec .EQ. precFloat32) THEN |
|
./pkg/debug/write_fullarray_rl.F |
67 |
WRITE_FULLARRAY_RL |
filePrec = precFloat32 |
|
./pkg/debug/write_fullarray_rs.F |
67 |
WRITE_FULLARRAY_RS |
filePrec = precFloat32 |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
393 |
DIAGNOSTICS_MNC_OUT |
IF ( ((writeBinaryPrec .EQ. precFloat32).AND. |
|
./pkg/diagnostics/diagnostics_out.F |
400 |
DIAGNOSTICS_OUT |
IF ( fflags(listId)(1:1).EQ.'R' ) prec = precFloat32 |
|
./eesupp/inc/EEPARAMS.h |
71 |
NO PROCEDURE |
INTEGER precFloat32 |
|
./eesupp/inc/EEPARAMS.h |
72 |
NO PROCEDURE |
PARAMETER ( precFloat32 = 32 ) |