| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_slice.F |
185 |
MDSREADFIELDXZ |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_slice.F |
187 |
MDSREADFIELDXZ |
call MDS_BYTESWAPR4(sNx,r4seg) |
|
./pkg/mdsio/mdsio_slice.F |
190 |
MDSREADFIELDXZ |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
192 |
MDSREADFIELDXZ |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
299 |
MDSREADFIELDYZ |
Real*4 r4seg(sNy) |
|
./pkg/mdsio/mdsio_slice.F |
423 |
MDSREADFIELDYZ |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_slice.F |
425 |
MDSREADFIELDYZ |
call MDS_BYTESWAPR4(sNy,r4seg) |
|
./pkg/mdsio/mdsio_slice.F |
428 |
MDSREADFIELDYZ |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
430 |
MDSREADFIELDYZ |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
542 |
MDSWRITEFIELDXZ |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_slice.F |
61 |
MDSREADFIELDXZ |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_slice.F |
631 |
MDSWRITEFIELDXZ |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
633 |
MDSWRITEFIELDXZ |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
641 |
MDSWRITEFIELDXZ |
call MDS_BYTESWAPR4(sNx,r4seg) |
|
./pkg/mdsio/mdsio_slice.F |
643 |
MDSWRITEFIELDXZ |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_slice.F |
760 |
MDSWRITEFIELDYZ |
Real*4 r4seg(sNy) |
|
./pkg/mdsio/mdsio_slice.F |
849 |
MDSWRITEFIELDYZ |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
851 |
MDSWRITEFIELDYZ |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice.F |
859 |
MDSWRITEFIELDYZ |
call MDS_BYTESWAPR4(sNy,r4seg) |
|
./pkg/mdsio/mdsio_slice.F |
861 |
MDSWRITEFIELDYZ |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_readfield_loc.F |
182 |
MDSREADFIELD_LOC |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_readfield_loc.F |
184 |
MDSREADFIELD_LOC |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
187 |
MDSREADFIELD_LOC |
call MDS_SEG4TORS( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
189 |
MDSREADFIELD_LOC |
call MDS_SEG4TORL( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
63 |
MDSREADFIELD_LOC |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_writetile.F |
160 |
MDS_WRITETILE |
call MDS_SEG4TORS( j,bi,bj,k,nNz, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writetile.F |
162 |
MDS_WRITETILE |
call MDS_SEG4TORL( j,bi,bj,k,nNz, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writetile.F |
170 |
MDS_WRITETILE |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_writetile.F |
172 |
MDS_WRITETILE |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_writetile.F |
78 |
MDS_WRITETILE |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_readtile.F |
176 |
MDS_READTILE |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_readtile.F |
178 |
MDS_READTILE |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_readtile.F |
181 |
MDS_READTILE |
call MDS_SEG4TORS( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readtile.F |
183 |
MDS_READTILE |
call MDS_SEG4TORL( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readtile.F |
65 |
MDS_READTILE |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_slice_loc.F |
175 |
MDSREADFIELDXZ_LOC |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_slice_loc.F |
177 |
MDSREADFIELDXZ_LOC |
call MDS_BYTESWAPR4(sNx,r4seg) |
|
./pkg/mdsio/mdsio_slice_loc.F |
180 |
MDSREADFIELDXZ_LOC |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
182 |
MDSREADFIELDXZ_LOC |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
289 |
MDSREADFIELDYZ_LOC |
Real*4 r4seg(sNy) |
|
./pkg/mdsio/mdsio_slice_loc.F |
404 |
MDSREADFIELDYZ_LOC |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_slice_loc.F |
406 |
MDSREADFIELDYZ_LOC |
call MDS_BYTESWAPR4(sNy,r4seg) |
|
./pkg/mdsio/mdsio_slice_loc.F |
409 |
MDSREADFIELDYZ_LOC |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
411 |
MDSREADFIELDYZ_LOC |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
523 |
MDSWRITEFIELDXZ_LOC |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_slice_loc.F |
603 |
MDSWRITEFIELDXZ_LOC |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
605 |
MDSWRITEFIELDXZ_LOC |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
60 |
MDSREADFIELDXZ_LOC |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_slice_loc.F |
613 |
MDSWRITEFIELDXZ_LOC |
call MDS_BYTESWAPR4(sNx,r4seg) |
|
./pkg/mdsio/mdsio_slice_loc.F |
615 |
MDSWRITEFIELDXZ_LOC |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_slice_loc.F |
732 |
MDSWRITEFIELDYZ_LOC |
Real*4 r4seg(sNy) |
|
./pkg/mdsio/mdsio_slice_loc.F |
812 |
MDSWRITEFIELDYZ_LOC |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
814 |
MDSWRITEFIELDYZ_LOC |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_slice_loc.F |
822 |
MDSWRITEFIELDYZ_LOC |
call MDS_BYTESWAPR4(sNy,r4seg) |
|
./pkg/mdsio/mdsio_slice_loc.F |
824 |
MDSWRITEFIELDYZ_LOC |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_readfield.F |
202 |
MDSREADFIELD |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_readfield.F |
204 |
MDSREADFIELD |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_readfield.F |
207 |
MDSREADFIELD |
call MDS_SEG4TORS( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readfield.F |
209 |
MDSREADFIELD |
call MDS_SEG4TORL( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readfield.F |
307 |
MDSREADFIELD |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_readfield.F |
309 |
MDSREADFIELD |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_readfield.F |
312 |
MDSREADFIELD |
call MDS_SEG4TORS( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readfield.F |
314 |
MDSREADFIELD |
call MDS_SEG4TORL( j,bi,bj,k,nNz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_readfield.F |
81 |
MDSREADFIELD |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl.F |
1192 |
MDSWRITEFIELD_2D_GL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl.F |
1371 |
MDSWRITEFIELD_2D_GL |
call MDS_SEG4TORS( j,bi,bj,k,nLocz, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
1373 |
MDSWRITEFIELD_2D_GL |
call MDS_SEG4TORL( j,bi,bj,k,nLocz, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
1381 |
MDSWRITEFIELD_2D_GL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_gl.F |
1383 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl.F |
272 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl.F |
274 |
MDSREADFIELD_3D_GL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_gl.F |
277 |
MDSREADFIELD_3D_GL |
call MDS_SEG4TORS( j,bi,bj,k,Nr, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
279 |
MDSREADFIELD_3D_GL |
call MDS_SEG4TORL( j,bi,bj,k,Nr, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
477 |
MDSWRITEFIELD_3D_GL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl.F |
655 |
MDSWRITEFIELD_3D_GL |
call MDS_SEG4TORS( j,bi,bj,k,Nr, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
657 |
MDSWRITEFIELD_3D_GL |
call MDS_SEG4TORL( j,bi,bj,k,Nr, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
665 |
MDSWRITEFIELD_3D_GL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_gl.F |
667 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl.F |
804 |
MDSREADFIELD_2D_GL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl.F |
90 |
MDSREADFIELD_3D_GL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl.F |
986 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl.F |
988 |
MDSREADFIELD_2D_GL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_gl.F |
991 |
MDSREADFIELD_2D_GL |
call MDS_SEG4TORS( j,bi,bj,k,nLocz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_gl.F |
993 |
MDSREADFIELD_2D_GL |
call MDS_SEG4TORL( j,bi,bj,k,nLocz, r4seg, .TRUE., arr ) |
|
./pkg/mdsio/mdsio_writelocal.F |
175 |
MDS_WRITELOCAL |
call MDS_SEG4TORS( j,1,1,k,nNz, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writelocal.F |
177 |
MDS_WRITELOCAL |
call MDS_SEG4TORL( j,1,1,k,nNz, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writelocal.F |
185 |
MDS_WRITELOCAL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_writelocal.F |
187 |
MDS_WRITELOCAL |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_writelocal.F |
82 |
MDS_WRITELOCAL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl_slice.F |
187 |
MDSREADFIELD_XZ_GL |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl_slice.F |
189 |
MDSREADFIELD_XZ_GL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
192 |
MDSREADFIELD_XZ_GL |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
194 |
MDSREADFIELD_XZ_GL |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
312 |
MDSREADFIELD_YZ_GL |
Real*4 r4seg(sNy) |
|
./pkg/mdsio/mdsio_gl_slice.F |
409 |
MDSREADFIELD_YZ_GL |
read(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl_slice.F |
411 |
MDSREADFIELD_YZ_GL |
call MDS_BYTESWAPR4( sNy, r4seg ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
414 |
MDSREADFIELD_YZ_GL |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
416 |
MDSREADFIELD_YZ_GL |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
546 |
MDSWRITEFIELD_XZ_GL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_gl_slice.F |
610 |
MDSWRITEFIELD_XZ_GL |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
612 |
MDSWRITEFIELD_XZ_GL |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
620 |
MDSWRITEFIELD_XZ_GL |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
622 |
MDSWRITEFIELD_XZ_GL |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl_slice.F |
761 |
MDSWRITEFIELD_YZ_GL |
Real*4 r4seg(sNy) |
|
./pkg/mdsio/mdsio_gl_slice.F |
825 |
MDSWRITEFIELD_YZ_GL |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
827 |
MDSWRITEFIELD_YZ_GL |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
|
./pkg/mdsio/mdsio_gl_slice.F |
835 |
MDSWRITEFIELD_YZ_GL |
call MDS_BYTESWAPR4( sNy, r4seg ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
837 |
MDSWRITEFIELD_YZ_GL |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_gl_slice.F |
89 |
MDSREADFIELD_XZ_GL |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
136 |
MDSWRITEVEC_LOC_RS |
r4seg(k) = arr(k) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
139 |
MDSWRITEVEC_LOC_RS |
CALL MDS_BYTESWAPR4( nArr, r4seg ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
141 |
MDSWRITEVEC_LOC_RS |
WRITE(dUnit,rec=irec) (r4seg(k),k=1,nArr) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
63 |
MDSWRITEVEC_LOC_RS |
real*4 r4seg(loc_size) |
|
./pkg/mdsio/mdsio_writefield_new.F |
107 |
MDSWRITEFIELD_NEW |
Real*4 r4seg(sNx) |
|
./pkg/mdsio/mdsio_writefield_new.F |
340 |
MDSWRITEFIELD_NEW |
call MDS_SEG4TORS( j,bi,bj,k,nNzdim, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
342 |
MDSWRITEFIELD_NEW |
call MDS_SEG4TORL( j,bi,bj,k,nNzdim, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
350 |
MDSWRITEFIELD_NEW |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
352 |
MDSWRITEFIELD_NEW |
write(dUnit,rec=irec) r4seg |
|
./pkg/mdsio/mdsio_writefield_new.F |
425 |
MDSWRITEFIELD_NEW |
call MDS_SEG4TORS( j,bi,bj,k,nNzdim, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
427 |
MDSWRITEFIELD_NEW |
call MDS_SEG4TORL( j,bi,bj,k,nNzdim, r4seg, .FALSE., arr ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
435 |
MDSWRITEFIELD_NEW |
call MDS_BYTESWAPR4( sNx, r4seg ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
437 |
MDSWRITEFIELD_NEW |
write(dUnit,rec=irec) r4seg |