File |
Line number |
Procedure |
Code |
./pkg/mdsio/mdsio_gl.F |
1146 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
1148 |
MDSREADFIELD_2D_GL |
call MDS_BYTESWAPR4( x_size*y_size, xy_buffer_r4 ) |
./pkg/mdsio/mdsio_gl.F |
1152 |
MDSREADFIELD_2D_GL |
global(I,J) = xy_buffer_r4(I,J) |
./pkg/mdsio/mdsio_gl.F |
1297 |
MDSWRITEFIELD_2D_GL |
Real*4 xy_buffer_r4(x_size,y_size) |
./pkg/mdsio/mdsio_gl.F |
1398 |
MDSWRITEFIELD_2D_GL |
xy_buffer_r4(I,J) = global(I,J) |
./pkg/mdsio/mdsio_gl.F |
1402 |
MDSWRITEFIELD_2D_GL |
call MDS_BYTESWAPR4( x_size*y_size, xy_buffer_r4 ) |
./pkg/mdsio/mdsio_gl.F |
1404 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
359 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
361 |
MDSREADFIELD_3D_GL |
call MDS_BYTESWAPR4( x_size*y_size, xy_buffer_r4 ) |
./pkg/mdsio/mdsio_gl.F |
365 |
MDSREADFIELD_3D_GL |
global(I,J) = xy_buffer_r4(I,J) |
./pkg/mdsio/mdsio_gl.F |
509 |
MDSWRITEFIELD_3D_GL |
Real*4 xy_buffer_r4(x_size,y_size) |
./pkg/mdsio/mdsio_gl.F |
609 |
MDSWRITEFIELD_3D_GL |
xy_buffer_r4(I,J) = global(I,J) |
./pkg/mdsio/mdsio_gl.F |
613 |
MDSWRITEFIELD_3D_GL |
call MDS_BYTESWAPR4( x_size*y_size, xy_buffer_r4 ) |
./pkg/mdsio/mdsio_gl.F |
615 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
874 |
MDSREADFIELD_2D_GL |
Real*4 xy_buffer_r4(x_size,y_size) |
./pkg/mdsio/mdsio_gl.F |
87 |
MDSREADFIELD_3D_GL |
Real*4 xy_buffer_r4(x_size,y_size) |
./pkg/mdsio/mdsio_read_field.F |
297 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_read_field.F |
299 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
./pkg/mdsio/mdsio_read_field.F |
316 |
MDS_READ_FIELD |
U xy_buffer_r4, |
./pkg/mdsio/mdsio_write_field.F |
308 |
MDS_WRITE_FIELD |
O xy_buffer_r4, |
./pkg/mdsio/mdsio_write_field.F |
348 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
./pkg/mdsio/mdsio_write_field.F |
350 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
./model/src/ini_model_io.F |
201 |
INI_MODEL_IO |
xy_buffer_r4(i) = 0. |
./eesupp/inc/EEBUFF_SCPU.h |
35 |
NO PROCEDURE |
COMMON /EE_BUFFERS_GLOBAL/ xy_buffer_r8, xy_buffer_r4 |
./eesupp/inc/EEBUFF_SCPU.h |
37 |
NO PROCEDURE |
Real*4 xy_buffer_r4(xyBuffer_size) |