| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_gl.F |
1113 |
MDSREADFIELD_2D_GL |
global(I,J) = xy_buffer_r4(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
1123 |
MDSREADFIELD_2D_GL |
global(I,J) = xy_buffer_r8(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
1141 |
MDSREADFIELD_2D_GL |
arr_gl(i,bi,ip,j,bj,jp,k) = global(II,JJ) |
|
./pkg/mdsio/mdsio_gl.F |
1260 |
MDSWRITEFIELD_2D_GL |
Real*8 global(Nx,Ny) |
|
./pkg/mdsio/mdsio_gl.F |
1337 |
MDSWRITEFIELD_2D_GL |
global(II,JJ) = arr_gl(i,bi,ip,j,bj,jp,k) |
|
./pkg/mdsio/mdsio_gl.F |
1350 |
MDSWRITEFIELD_2D_GL |
xy_buffer_r4(I,J) = global(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
1360 |
MDSWRITEFIELD_2D_GL |
xy_buffer_r8(I,J) = global(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
352 |
MDSREADFIELD_3D_GL |
global(I,J) = xy_buffer_r4(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
362 |
MDSREADFIELD_3D_GL |
global(I,J) = xy_buffer_r8(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
380 |
MDSREADFIELD_3D_GL |
arr_gl(i,bi,ip,j,bj,jp,k) = global(II,JJ) |
|
./pkg/mdsio/mdsio_gl.F |
498 |
MDSWRITEFIELD_3D_GL |
Real*8 global(Nx,Ny) |
|
./pkg/mdsio/mdsio_gl.F |
574 |
MDSWRITEFIELD_3D_GL |
global(II,JJ) = arr_gl(i,bi,ip,j,bj,jp,k) |
|
./pkg/mdsio/mdsio_gl.F |
587 |
MDSWRITEFIELD_3D_GL |
xy_buffer_r4(I,J) = global(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
597 |
MDSWRITEFIELD_3D_GL |
xy_buffer_r8(I,J) = global(I,J) |
|
./pkg/mdsio/mdsio_gl.F |
850 |
MDSREADFIELD_2D_GL |
Real*8 global(Nx,Ny) |
|
./pkg/mdsio/mdsio_gl.F |
89 |
MDSREADFIELD_3D_GL |
Real*8 global(Nx,Ny) |
|
./pkg/mdsio/mdsio_readvector.F |
295 |
MDSREADVECTOR |
global(L) = xy_buffer_r4(L) |
|
./pkg/mdsio/mdsio_readvector.F |
307 |
MDSREADVECTOR |
global(L) = xy_buffer_r8(L) |
|
./pkg/mdsio/mdsio_readvector.F |
318 |
MDSREADVECTOR |
CALL SCATTER_VECTOR( narr,global,local,myThid ) |
|
./pkg/mdsio/mdsio_readvector.F |
72 |
MDSREADVECTOR |
Real*8 global (narr*nPx*nPy) |
|
./pkg/mdsio/mdsio_writevector.F |
172 |
MDSWRITEVECTOR |
CALL GATHER_VECTOR( lprint, narr, global, local, myThid ) |
|
./pkg/mdsio/mdsio_writevector.F |
181 |
MDSWRITEVECTOR |
xy_buffer_r4(L) = global(L) |
|
./pkg/mdsio/mdsio_writevector.F |
193 |
MDSWRITEVECTOR |
xy_buffer_r8(L) = global(L) |
|
./pkg/mdsio/mdsio_writevector.F |
83 |
MDSWRITEVECTOR |
Real*8 global(narr*nPx*nPy) |
|
./eesupp/src/gather_vector.F |
17 |
GATHER_VECTOR |
Real*8 global(length*nPx*nPy) |
|
./eesupp/src/gather_vector.F |
37 |
GATHER_VECTOR |
global(lG) = local(l) |
|
./eesupp/src/gather_vector.F |
55 |
GATHER_VECTOR |
global(lG) = local(l) |
|
./eesupp/src/gather_vector.F |
6 |
GATHER_VECTOR |
SUBROUTINE GATHER_VECTOR( lprint, length, global, local, myThid ) |
|
./eesupp/src/gather_vector.F |
79 |
GATHER_VECTOR |
global(lG) = temp(l) |
|
./eesupp/src/gather_xz.F |
15 |
GATHER_XZ |
Real*8 global(Nx) |
|
./eesupp/src/gather_xz.F |
37 |
GATHER_XZ |
global(iG) = local(i,bi,bj) |
|
./eesupp/src/gather_xz.F |
57 |
GATHER_XZ |
global(iG) = local(i,bi,bj) |
|
./eesupp/src/gather_xz.F |
6 |
GATHER_XZ |
SUBROUTINE GATHER_XZ( global, local, myThid ) |
|
./eesupp/src/gather_xz.F |
76 |
GATHER_XZ |
global(iG) = temp(i,bi,bj) |
|
./eesupp/src/gather_yz.F |
15 |
GATHER_YZ |
Real*8 global(Ny) |
|
./eesupp/src/gather_yz.F |
37 |
GATHER_YZ |
global(jG) = local(j,bi,bj) |
|
./eesupp/src/gather_yz.F |
57 |
GATHER_YZ |
global(jG) = local(j,bi,bj) |
|
./eesupp/src/gather_yz.F |
6 |
GATHER_YZ |
SUBROUTINE GATHER_YZ( global, local, myThid ) |
|
./eesupp/src/gather_yz.F |
76 |
GATHER_YZ |
global(jG) = temp(j,bi,bj) |
|
./eesupp/src/scatter_vector.F |
16 |
SCATTER_VECTOR |
Real*8 global(length*nPx*nPy) |
|
./eesupp/src/scatter_vector.F |
37 |
SCATTER_VECTOR |
local(l) = global(lG) |
|
./eesupp/src/scatter_vector.F |
54 |
SCATTER_VECTOR |
local(l) = global(lG) |
|
./eesupp/src/scatter_vector.F |
63 |
SCATTER_VECTOR |
temp(l) = global(lG) |
|
./eesupp/src/scatter_vector.F |
6 |
SCATTER_VECTOR |
SUBROUTINE SCATTER_VECTOR( length, global, local, myThid ) |
|
./eesupp/src/scatter_xz.F |
15 |
SCATTER_XZ |
Real*8 global(Nx) |
|
./eesupp/src/scatter_xz.F |
38 |
SCATTER_XZ |
local(i,bi,bj) = global(iG) |
|
./eesupp/src/scatter_xz.F |
57 |
SCATTER_XZ |
local(i,bi,bj) = global(iG) |
|
./eesupp/src/scatter_xz.F |
68 |
SCATTER_XZ |
temp(i,bi,bj) = global(iG) |
|
./eesupp/src/scatter_xz.F |
6 |
SCATTER_XZ |
SUBROUTINE SCATTER_XZ( global, local, myThid ) |
|
./eesupp/src/scatter_yz.F |
15 |
SCATTER_YZ |
Real*8 global(Ny) |
|
./eesupp/src/scatter_yz.F |
38 |
SCATTER_YZ |
local(j,bi,bj) = global(jG) |
|
./eesupp/src/scatter_yz.F |
57 |
SCATTER_YZ |
local(j,bi,bj) = global(jG) |
|
./eesupp/src/scatter_yz.F |
68 |
SCATTER_YZ |
temp(j,bi,bj) = global(jG) |
|
./eesupp/src/scatter_yz.F |
6 |
SCATTER_YZ |
SUBROUTINE SCATTER_YZ( global, local, myThid ) |