| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_read_tape.F |
172 |
MDS_READ_TAPE |
CALL SCATTER_VEC_R4( gl_buffer_r4, local_r4, nSize, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
240 |
MDS_READ_TAPE |
READ(dUnit,rec=jRec) local_r4 |
|
./pkg/mdsio/mdsio_read_tape.F |
242 |
MDS_READ_TAPE |
CALL MDS_BYTESWAPR4( nSize, local_r4 ) |
|
./pkg/mdsio/mdsio_read_tape.F |
271 |
MDS_READ_TAPE |
fldR4(j) = local_r4(j) |
|
./pkg/mdsio/mdsio_read_tape.F |
281 |
MDS_READ_TAPE |
fldR8(j) = local_r4(j) |
|
./pkg/mdsio/mdsio_read_tape.F |
78 |
MDS_READ_TAPE |
_R4 local_r4 (nSize) |
|
./pkg/mdsio/mdsio_write_tape.F |
109 |
MDS_WRITE_TAPE |
local_r4(j) = fldR8(j) |
|
./pkg/mdsio/mdsio_write_tape.F |
167 |
MDS_WRITE_TAPE |
CALL GATHER_VEC_R4( gl_buffer_r4, local_r4, nSize, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
271 |
MDS_WRITE_TAPE |
CALL MDS_BYTESWAPR4( nSize, local_r4 ) |
|
./pkg/mdsio/mdsio_write_tape.F |
273 |
MDS_WRITE_TAPE |
WRITE(dUnit,rec=jRec) local_r4 |
|
./pkg/mdsio/mdsio_write_tape.F |
84 |
MDS_WRITE_TAPE |
_R4 local_r4 (nSize) |
|
./pkg/mdsio/mdsio_write_tape.F |
99 |
MDS_WRITE_TAPE |
local_r4(j) = fldR4(j) |