File |
Line number |
Procedure |
Code |
./pkg/mdsio/mdsio_gl.F |
1117 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
1119 |
MDSREADFIELD_2D_GL |
call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_gl.F |
1123 |
MDSREADFIELD_2D_GL |
global(I,J) = xy_buffer_r8(I,J) |
./pkg/mdsio/mdsio_gl.F |
1259 |
MDSWRITEFIELD_2D_GL |
Real*8 xy_buffer_r8(x_size,y_size) |
./pkg/mdsio/mdsio_gl.F |
1360 |
MDSWRITEFIELD_2D_GL |
xy_buffer_r8(I,J) = global(I,J) |
./pkg/mdsio/mdsio_gl.F |
1364 |
MDSWRITEFIELD_2D_GL |
call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_gl.F |
1366 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
356 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
358 |
MDSREADFIELD_3D_GL |
call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_gl.F |
362 |
MDSREADFIELD_3D_GL |
global(I,J) = xy_buffer_r8(I,J) |
./pkg/mdsio/mdsio_gl.F |
497 |
MDSWRITEFIELD_3D_GL |
Real*8 xy_buffer_r8(x_size,y_size) |
./pkg/mdsio/mdsio_gl.F |
597 |
MDSWRITEFIELD_3D_GL |
xy_buffer_r8(I,J) = global(I,J) |
./pkg/mdsio/mdsio_gl.F |
601 |
MDSWRITEFIELD_3D_GL |
call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_gl.F |
603 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
849 |
MDSREADFIELD_2D_GL |
Real*8 xy_buffer_r8(x_size,y_size) |
./pkg/mdsio/mdsio_gl.F |
88 |
MDSREADFIELD_3D_GL |
Real*8 xy_buffer_r8(x_size,y_size) |
./pkg/mdsio/mdsio_read_field.F |
287 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_read_field.F |
289 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_read_field.F |
322 |
MDS_READ_FIELD |
U xy_buffer_r8, |
./pkg/mdsio/mdsio_readvector.F |
196 |
MDSREADVECTOR |
CALL MDS_RD_REC_RS( arr, xy_buffer_r4, xy_buffer_r8, |
./pkg/mdsio/mdsio_readvector.F |
199 |
MDSREADVECTOR |
CALL MDS_RD_REC_RL( arr, xy_buffer_r4, xy_buffer_r8, |
./pkg/mdsio/mdsio_readvector.F |
299 |
MDSREADVECTOR |
READ(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_readvector.F |
301 |
MDSREADVECTOR |
CALL MDS_BYTESWAPR8( vec_size, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_readvector.F |
307 |
MDSREADVECTOR |
global(L) = xy_buffer_r8(L) |
./pkg/mdsio/mdsio_readvector.F |
71 |
MDSREADVECTOR |
Real*8 xy_buffer_r8(narr*nPx*nPy) |
./pkg/mdsio/mdsio_write_field.F |
303 |
MDS_WRITE_FIELD |
O xy_buffer_r8, |
./pkg/mdsio/mdsio_write_field.F |
327 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_write_field.F |
329 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_writevector.F |
193 |
MDSWRITEVECTOR |
xy_buffer_r8(L) = global(L) |
./pkg/mdsio/mdsio_writevector.F |
197 |
MDSWRITEVECTOR |
CALL MDS_BYTESWAPR8( vec_size, xy_buffer_r8 ) |
./pkg/mdsio/mdsio_writevector.F |
199 |
MDSWRITEVECTOR |
WRITE(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_writevector.F |
288 |
MDSWRITEVECTOR |
CALL MDS_WR_REC_RS( arr, xy_buffer_r4, xy_buffer_r8, |
./pkg/mdsio/mdsio_writevector.F |
291 |
MDSWRITEVECTOR |
CALL MDS_WR_REC_RL( arr, xy_buffer_r4, xy_buffer_r8, |
./pkg/mdsio/mdsio_writevector.F |
88 |
MDSWRITEVECTOR |
Real*8 xy_buffer_r8(narr*nPx*nPy) |
./pkg/profiles/profiles_init_fixed.F |
56 |
PROFILES_INIT_FIXED |
Real*8 xy_buffer_r8(0:sNx+1,0:sNy+1) |
./pkg/profiles/profiles_init_fixed.F |
598 |
PROFILES_INIT_FIXED |
xy_buffer_r8(l,m)=xC(l,m,bi,bj) |
./pkg/profiles/profiles_init_fixed.F |
602 |
PROFILES_INIT_FIXED |
call MDS_BYTESWAPR8((sNx+2)*(sNy+2),xy_buffer_r8) |
./pkg/profiles/profiles_init_fixed.F |
604 |
PROFILES_INIT_FIXED |
write(fid,rec=1) xy_buffer_r8 |
./pkg/profiles/profiles_init_fixed.F |
618 |
PROFILES_INIT_FIXED |
xy_buffer_r8(l,m)=yC(l,m,bi,bj) |
./pkg/profiles/profiles_init_fixed.F |
622 |
PROFILES_INIT_FIXED |
call MDS_BYTESWAPR8((sNx+2)*(sNy+2),xy_buffer_r8) |
./pkg/profiles/profiles_init_fixed.F |
624 |
PROFILES_INIT_FIXED |
write(fid,rec=1) xy_buffer_r8 |
./model/src/ini_model_io.F |
191 |
INI_MODEL_IO |
xy_buffer_r8(i) = 0. _d 0 |
./eesupp/src/global_sum_singlecpu.F |
102 |
GLOBAL_SUM_SINGLECPU_RL |
O xy_buffer_r8, |
./eesupp/src/global_sum_singlecpu.F |
117 |
GLOBAL_SUM_SINGLECPU_RL |
sumAll = sumAll + xy_buffer_r8(ij) |
./eesupp/inc/EEBUFF_SCPU.h |
35 |
NO PROCEDURE |
COMMON /EE_BUFFERS_GLOBAL/ xy_buffer_r8, xy_buffer_r4 |
./eesupp/inc/EEBUFF_SCPU.h |
36 |
NO PROCEDURE |
Real*8 xy_buffer_r8(xyBuffer_size) |