File |
Line number |
Procedure |
Code |
./pkg/exf/exf_set_obcs.F |
105 |
EXF_SET_OBCS_XZ |
DO k = 1,nNz |
./pkg/exf/exf_set_obcs.F |
126 |
EXF_SET_OBCS_YZ |
I obcs_file, obcsmask, nNz, |
./pkg/exf/exf_set_obcs.F |
154 |
EXF_SET_OBCS_YZ |
INTEGER nNz |
./pkg/exf/exf_set_obcs.F |
155 |
EXF_SET_OBCS_YZ |
_RL obcs_fld_yz(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
156 |
EXF_SET_OBCS_YZ |
_RL obcs_yz_0(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
157 |
EXF_SET_OBCS_YZ |
_RL obcs_yz_1(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
17 |
EXF_SET_OBCS_XZ |
I obcs_file, obcsmask, nNz, |
./pkg/exf/exf_set_obcs.F |
190 |
EXF_SET_OBCS_YZ |
CALL READ_REC_YZ_RL( obcs_file0, exf_iprec_obcs, nNz, |
./pkg/exf/exf_set_obcs.F |
196 |
EXF_SET_OBCS_YZ |
CALL EXF_SWAPFFIELDS_YZ( obcs_yz_0, obcs_yz_1, nNz,myThid ) |
./pkg/exf/exf_set_obcs.F |
205 |
EXF_SET_OBCS_YZ |
CALL READ_REC_YZ_RL( obcs_file1, exf_iprec_obcs, nNz, |
./pkg/exf/exf_set_obcs.F |
212 |
EXF_SET_OBCS_YZ |
DO k = 1,nNz |
./pkg/exf/exf_set_obcs.F |
46 |
EXF_SET_OBCS_XZ |
INTEGER nNz |
./pkg/exf/exf_set_obcs.F |
47 |
EXF_SET_OBCS_XZ |
_RL obcs_fld_xz(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
48 |
EXF_SET_OBCS_XZ |
_RL obcs_xz_0(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
49 |
EXF_SET_OBCS_XZ |
_RL obcs_xz_1(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
83 |
EXF_SET_OBCS_XZ |
CALL READ_REC_XZ_RL( obcs_file0, exf_iprec_obcs, nNz, |
./pkg/exf/exf_set_obcs.F |
89 |
EXF_SET_OBCS_XZ |
CALL EXF_SWAPFFIELDS_XZ( obcs_xz_0, obcs_xz_1, nNz,myThid ) |
./pkg/exf/exf_set_obcs.F |
98 |
EXF_SET_OBCS_XZ |
CALL READ_REC_XZ_RL( obcs_file1, exf_iprec_obcs, nNz, |
./pkg/exf/exf_swapffields.F |
110 |
EXF_SWAPFFIELDS_3D |
DO k = 1,nNz |
./pkg/exf/exf_swapffields.F |
129 |
EXF_SWAPFFIELDS_XZ |
I nNz, myThid ) |
./pkg/exf/exf_swapffields.F |
151 |
EXF_SWAPFFIELDS_XZ |
INTEGER nNz |
./pkg/exf/exf_swapffields.F |
152 |
EXF_SWAPFFIELDS_XZ |
_RL ffld0(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/exf/exf_swapffields.F |
153 |
EXF_SWAPFFIELDS_XZ |
_RL ffld1(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/exf/exf_swapffields.F |
164 |
EXF_SWAPFFIELDS_XZ |
DO k = 1,nNz |
./pkg/exf/exf_swapffields.F |
181 |
EXF_SWAPFFIELDS_YZ |
I nNz, myThid ) |
./pkg/exf/exf_swapffields.F |
203 |
EXF_SWAPFFIELDS_YZ |
INTEGER nNz |
./pkg/exf/exf_swapffields.F |
204 |
EXF_SWAPFFIELDS_YZ |
_RL ffld0(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/exf/exf_swapffields.F |
205 |
EXF_SWAPFFIELDS_YZ |
_RL ffld1(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/exf/exf_swapffields.F |
216 |
EXF_SWAPFFIELDS_YZ |
DO k = 1,nNz |
./pkg/exf/exf_swapffields.F |
77 |
EXF_SWAPFFIELDS_3D |
I nNz, myThid ) |
./pkg/exf/exf_swapffields.F |
97 |
EXF_SWAPFFIELDS_3D |
INTEGER nNz |
./pkg/exf/exf_swapffields.F |
98 |
EXF_SWAPFFIELDS_3D |
_RL ffld0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/exf/exf_swapffields.F |
99 |
EXF_SWAPFFIELDS_3D |
_RL ffld1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_gl.F |
1144 |
MDSREADFIELD_2D_GL |
irec = k+nNz*(irecord-1) |
./pkg/mdsio/mdsio_gl.F |
1211 |
MDSWRITEFIELD_2D_GL |
I nNz, |
./pkg/mdsio/mdsio_gl.F |
1263 |
MDSWRITEFIELD_2D_GL |
integer nNz, nLocz |
./pkg/mdsio/mdsio_gl.F |
19 |
MDSREADFIELD_3D_GL |
I nNz, |
./pkg/mdsio/mdsio_gl.F |
272 |
MDSREADFIELD_3D_GL |
& + nSx*nPx*Ny*nNz*(irecord-1) |
./pkg/mdsio/mdsio_gl.F |
350 |
MDSREADFIELD_3D_GL |
DO k=1,nNz |
./pkg/mdsio/mdsio_gl.F |
357 |
MDSREADFIELD_3D_GL |
irec = k+nNz*(irecord-1) |
./pkg/mdsio/mdsio_gl.F |
424 |
MDSWRITEFIELD_3D_GL |
I nNz, |
./pkg/mdsio/mdsio_gl.F |
476 |
MDSWRITEFIELD_3D_GL |
integer nNz |
./pkg/mdsio/mdsio_gl.F |
586 |
MDSWRITEFIELD_3D_GL |
DO k=1,nNz |
./pkg/mdsio/mdsio_gl.F |
605 |
MDSWRITEFIELD_3D_GL |
irec=k+nNz*(irecord-1) |
./pkg/mdsio/mdsio_gl.F |
61 |
MDSREADFIELD_3D_GL |
integer nNz |
./pkg/mdsio/mdsio_gl.F |
647 |
MDSWRITEFIELD_3D_GL |
dimList(1,3)=nNz |
./pkg/mdsio/mdsio_gl.F |
649 |
MDSWRITEFIELD_3D_GL |
dimList(3,3)=nNz |
./pkg/mdsio/mdsio_gl.F |
651 |
MDSWRITEFIELD_3D_GL |
if (nNz .EQ. 1) nDims=2 |
./pkg/mdsio/mdsio_gl.F |
805 |
MDSREADFIELD_2D_GL |
I nNz, |
./pkg/mdsio/mdsio_gl.F |
847 |
MDSREADFIELD_2D_GL |
integer nNz, nLocz |
./pkg/mdsio/mdsio_gl_slice.F |
188 |
MDSREADFIELD_XZ_GL |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
191 |
MDSREADFIELD_XZ_GL |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
19 |
MDSREADFIELD_XZ_GL |
I nNz, |
./pkg/mdsio/mdsio_gl_slice.F |
205 |
MDSREADFIELD_XZ_GL |
call MDS_SEG8TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
208 |
MDSREADFIELD_XZ_GL |
call MDS_SEG8TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
260 |
MDSREADFIELD_YZ_GL |
I nNz, |
./pkg/mdsio/mdsio_gl_slice.F |
302 |
MDSREADFIELD_YZ_GL |
integer nNz |
./pkg/mdsio/mdsio_gl_slice.F |
428 |
MDSREADFIELD_YZ_GL |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
431 |
MDSREADFIELD_YZ_GL |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
445 |
MDSREADFIELD_YZ_GL |
call MDS_SEG8TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
448 |
MDSREADFIELD_YZ_GL |
call MDS_SEG8TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
500 |
MDSWRITEFIELD_XZ_GL |
I nNz, |
./pkg/mdsio/mdsio_gl_slice.F |
552 |
MDSWRITEFIELD_XZ_GL |
integer nNz |
./pkg/mdsio/mdsio_gl_slice.F |
61 |
MDSREADFIELD_XZ_GL |
integer nNz |
./pkg/mdsio/mdsio_gl_slice.F |
647 |
MDSWRITEFIELD_XZ_GL |
call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
650 |
MDSWRITEFIELD_XZ_GL |
call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
664 |
MDSWRITEFIELD_XZ_GL |
call MDS_SEG8TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
667 |
MDSWRITEFIELD_XZ_GL |
call MDS_SEG8TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
741 |
MDSWRITEFIELD_YZ_GL |
I nNz, |
./pkg/mdsio/mdsio_gl_slice.F |
793 |
MDSWRITEFIELD_YZ_GL |
integer nNz |
./pkg/mdsio/mdsio_gl_slice.F |
888 |
MDSWRITEFIELD_YZ_GL |
call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
891 |
MDSWRITEFIELD_YZ_GL |
call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
905 |
MDSWRITEFIELD_YZ_GL |
call MDS_SEG8TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r8seg,arr) |
./pkg/mdsio/mdsio_gl_slice.F |
908 |
MDSWRITEFIELD_YZ_GL |
call MDS_SEG8TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r8seg,arr) |
./pkg/mdsio/mdsio_pass_r4torl.F |
108 |
MDS_PASS_R4TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4torl.F |
17 |
MDS_PASS_R4TORL |
I oLi, oLj, nNz, kLo, kSize, |
./pkg/mdsio/mdsio_pass_r4torl.F |
46 |
MDS_PASS_R4TORL |
INTEGER nNz, kSize |
./pkg/mdsio/mdsio_pass_r4torl.F |
47 |
MDS_PASS_R4TORL |
Real*4 buffer(1-oLi:sNx+oLi,1-oLj:sNy+oLj,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_pass_r4torl.F |
70 |
MDS_PASS_R4TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4torl.F |
83 |
MDS_PASS_R4TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4torl.F |
99 |
MDS_PASS_R4TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4tors.F |
108 |
MDS_PASS_R4TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4tors.F |
17 |
MDS_PASS_R4TORS |
I oLi, oLj, nNz, kLo, kSize, |
./pkg/mdsio/mdsio_pass_r4tors.F |
46 |
MDS_PASS_R4TORS |
INTEGER nNz, kSize |
./pkg/mdsio/mdsio_pass_r4tors.F |
47 |
MDS_PASS_R4TORS |
Real*4 buffer(1-oLi:sNx+oLi,1-oLj:sNy+oLj,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_pass_r4tors.F |
70 |
MDS_PASS_R4TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4tors.F |
83 |
MDS_PASS_R4TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r4tors.F |
99 |
MDS_PASS_R4TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8torl.F |
108 |
MDS_PASS_R8TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8torl.F |
17 |
MDS_PASS_R8TORL |
I oLi, oLj, nNz, kLo, kSize, |
./pkg/mdsio/mdsio_pass_r8torl.F |
46 |
MDS_PASS_R8TORL |
INTEGER nNz, kSize |
./pkg/mdsio/mdsio_pass_r8torl.F |
47 |
MDS_PASS_R8TORL |
Real*8 buffer(1-oLi:sNx+oLi,1-oLj:sNy+oLj,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_pass_r8torl.F |
70 |
MDS_PASS_R8TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8torl.F |
83 |
MDS_PASS_R8TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8torl.F |
99 |
MDS_PASS_R8TORL |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8tors.F |
108 |
MDS_PASS_R8TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8tors.F |
17 |
MDS_PASS_R8TORS |
I oLi, oLj, nNz, kLo, kSize, |
./pkg/mdsio/mdsio_pass_r8tors.F |
46 |
MDS_PASS_R8TORS |
INTEGER nNz, kSize |
./pkg/mdsio/mdsio_pass_r8tors.F |
47 |
MDS_PASS_R8TORS |
Real*8 buffer(1-oLi:sNx+oLi,1-oLj:sNy+oLj,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_pass_r8tors.F |
70 |
MDS_PASS_R8TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8tors.F |
83 |
MDS_PASS_R8TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_pass_r8tors.F |
99 |
MDS_PASS_R8TORS |
DO k=1,nNz |
./pkg/mdsio/mdsio_read_field.F |
111 |
MDS_READ_FIELD |
INTEGER i1,i2,i,j,k,nNz |
./pkg/mdsio/mdsio_read_field.F |
139 |
MDS_READ_FIELD |
nNz = 1 + kHi - kLo |
./pkg/mdsio/mdsio_read_field.F |
197 |
MDS_READ_FIELD |
IF ( .NOT.useSingleCpuIO .AND. nNz.GT.size3dBuf ) THEN |
./pkg/mdsio/mdsio_read_field.F |
203 |
MDS_READ_FIELD |
& ' MDS_READ_FIELD: Nb Lev to read =', nNz, |
./pkg/mdsio/mdsio_read_field.F |
295 |
MDS_READ_FIELD |
irec = 1 + k-kLo + (irecord-1)*nNz |
./pkg/mdsio/mdsio_read_field.F |
393 |
MDS_READ_FIELD |
bBij = sNx*sNy*nNz*( bi-1 + (bj-1)*nSx ) |
./pkg/mdsio/mdsio_read_field.F |
434 |
MDS_READ_FIELD |
& +( k-kLo + (irecord-1)*nNz )*global_nTx*ySize |
./pkg/mdsio/mdsio_read_field.F |
467 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, sNx*sNy*nNz, myThid ) |
./pkg/mdsio/mdsio_read_field.F |
488 |
MDS_READ_FIELD |
i2 = bBij + sNx*sNy*nNz |
./pkg/mdsio/mdsio_read_field.F |
516 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR4( sNx*sNy*nNz*nSx*nSy, shared3dBuf_r4 ) |
./pkg/mdsio/mdsio_read_field.F |
518 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR8( sNx*sNy*nNz*nSx*nSy, shared3dBuf_r8 ) |
./pkg/mdsio/mdsio_read_field.F |
532 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
./pkg/mdsio/mdsio_read_field.F |
535 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
./pkg/mdsio/mdsio_read_field.F |
546 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
./pkg/mdsio/mdsio_read_field.F |
549 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
./pkg/mdsio/mdsio_rw_field.F |
118 |
MDSREADFIELD_LOC |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_field.F |
130 |
MDSREADFIELD_LOC |
I fName, filePrec, .TRUE., arrType, nNz, 1, nNz, |
./pkg/mdsio/mdsio_rw_field.F |
135 |
MDSREADFIELD_LOC |
I fName, filePrec, .TRUE., arrType, nNz, 1, nNz, |
./pkg/mdsio/mdsio_rw_field.F |
154 |
MDSWRITEFIELD |
I nNz, |
./pkg/mdsio/mdsio_rw_field.F |
189 |
MDSWRITEFIELD |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_field.F |
190 |
MDSWRITEFIELD |
_RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_rw_field.F |
203 |
MDSWRITEFIELD |
I arrType, nNz, 1, nNz, arr, dummyRS, |
./pkg/mdsio/mdsio_rw_field.F |
208 |
MDSWRITEFIELD |
I arrType, nNz, 1, nNz, dummyRL, arr, |
./pkg/mdsio/mdsio_rw_field.F |
21 |
MDSREADFIELD |
I nNz, |
./pkg/mdsio/mdsio_rw_field.F |
226 |
MDSWRITEFIELD_LOC |
I nNz, |
./pkg/mdsio/mdsio_rw_field.F |
261 |
MDSWRITEFIELD_LOC |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_field.F |
262 |
MDSWRITEFIELD_LOC |
_RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_rw_field.F |
275 |
MDSWRITEFIELD_LOC |
I arrType, nNz, 1, nNz, arr, dummyRS, |
./pkg/mdsio/mdsio_rw_field.F |
280 |
MDSWRITEFIELD_LOC |
I arrType, nNz, 1, nNz, dummyRL, arr, |
./pkg/mdsio/mdsio_rw_field.F |
52 |
MDSREADFIELD |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_field.F |
64 |
MDSREADFIELD |
I fName, filePrec, .FALSE., arrType, nNz, 1, nNz, |
./pkg/mdsio/mdsio_rw_field.F |
69 |
MDSREADFIELD |
I fName, filePrec, .FALSE., arrType, nNz, 1, nNz, |
./pkg/mdsio/mdsio_rw_field.F |
87 |
MDSREADFIELD_LOC |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
120 |
MDSREADFIELDYZ |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
132 |
MDSREADFIELDYZ |
I fName, filePrec, .FALSE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
137 |
MDSREADFIELDYZ |
I fName, filePrec, .FALSE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
155 |
MDSREADFIELDXZ_LOC |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
185 |
MDSREADFIELDXZ_LOC |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
197 |
MDSREADFIELDXZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
202 |
MDSREADFIELDXZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
220 |
MDSREADFIELDYZ_LOC |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
250 |
MDSREADFIELDYZ_LOC |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
25 |
MDSREADFIELDXZ |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
262 |
MDSREADFIELDYZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
267 |
MDSREADFIELDYZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
286 |
MDSWRITEFIELDXZ |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
320 |
MDSWRITEFIELDXZ |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
334 |
MDSWRITEFIELDXZ |
I arrType, nNz, arr, dummyRS, |
./pkg/mdsio/mdsio_rw_slice.F |
339 |
MDSWRITEFIELDXZ |
I arrType, nNz, dummyRL, arr, |
./pkg/mdsio/mdsio_rw_slice.F |
357 |
MDSWRITEFIELDYZ |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
391 |
MDSWRITEFIELDYZ |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
405 |
MDSWRITEFIELDYZ |
I arrType, nNz, arr, dummyRS, |
./pkg/mdsio/mdsio_rw_slice.F |
410 |
MDSWRITEFIELDYZ |
I arrType, nNz, dummyRL, arr, |
./pkg/mdsio/mdsio_rw_slice.F |
428 |
MDSWRITEFIELDXZ_LOC |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
462 |
MDSWRITEFIELDXZ_LOC |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
476 |
MDSWRITEFIELDXZ_LOC |
I arrType, nNz, arr, dummyRS, |
./pkg/mdsio/mdsio_rw_slice.F |
481 |
MDSWRITEFIELDXZ_LOC |
I arrType, nNz, dummyRL, arr, |
./pkg/mdsio/mdsio_rw_slice.F |
499 |
MDSWRITEFIELDYZ_LOC |
I nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
533 |
MDSWRITEFIELDYZ_LOC |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
547 |
MDSWRITEFIELDYZ_LOC |
I arrType, nNz, arr, dummyRS, |
./pkg/mdsio/mdsio_rw_slice.F |
552 |
MDSWRITEFIELDYZ_LOC |
I arrType, nNz, dummyRL, arr, |
./pkg/mdsio/mdsio_rw_slice.F |
55 |
MDSREADFIELDXZ |
INTEGER nNz |
./pkg/mdsio/mdsio_rw_slice.F |
67 |
MDSREADFIELDXZ |
I fName, filePrec, .FALSE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
72 |
MDSREADFIELDXZ |
I fName, filePrec, .FALSE., arrType, nNz, |
./pkg/mdsio/mdsio_rw_slice.F |
90 |
MDSREADFIELDYZ |
I nNz, |
./pkg/mdsio/mdsio_seg4torl.F |
22 |
MDS_SEG4TORL |
INTEGER j,bi,bj,k,nNz |
./pkg/mdsio/mdsio_seg4torl.F |
23 |
MDS_SEG4TORL |
_RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_seg4torl.F |
6 |
MDS_SEG4TORL |
SUBROUTINE MDS_SEG4TORL( j,bi,bj,k,nNz, seg, copyTo, arr ) |
./pkg/mdsio/mdsio_seg4tors.F |
22 |
MDS_SEG4TORS |
INTEGER j,bi,bj,k,nNz |
./pkg/mdsio/mdsio_seg4tors.F |
23 |
MDS_SEG4TORS |
_RS arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_seg4tors.F |
6 |
MDS_SEG4TORS |
SUBROUTINE MDS_SEG4TORS( j,bi,bj,k,nNz, seg, copyTo, arr ) |
./pkg/mdsio/mdsio_seg8torl.F |
22 |
MDS_SEG8TORL |
INTEGER j,bi,bj,k,nNz |
./pkg/mdsio/mdsio_seg8torl.F |
23 |
MDS_SEG8TORL |
_RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_seg8torl.F |
6 |
MDS_SEG8TORL |
SUBROUTINE MDS_SEG8TORL( j,bi,bj,k,nNz, seg, copyTo, arr ) |
./pkg/mdsio/mdsio_seg8tors.F |
22 |
MDS_SEG8TORS |
INTEGER j,bi,bj,k,nNz |
./pkg/mdsio/mdsio_seg8tors.F |
23 |
MDS_SEG8TORS |
_RS arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_seg8tors.F |
6 |
MDS_SEG8TORS |
SUBROUTINE MDS_SEG8TORS( j,bi,bj,k,nNz, seg, copyTo, arr ) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
115 |
MDS_SEG8TORL_2D |
INTEGER sn,ol,nNz,bi,bj,k |
./pkg/mdsio/mdsio_segxtorx_2d.F |
118 |
MDS_SEG8TORL_2D |
_RL arr(1-ol:sn+ol,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
138 |
MDS_SEG8TORS_2D |
SUBROUTINE MDS_SEG8TORS_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
156 |
MDS_SEG8TORS_2D |
INTEGER sn,ol,nNz,bi,bj,k |
./pkg/mdsio/mdsio_segxtorx_2d.F |
159 |
MDS_SEG8TORS_2D |
_RS arr(1-ol:sn+ol,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
15 |
MDS_SEG4TORL_2D |
SUBROUTINE MDS_SEG4TORL_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
33 |
MDS_SEG4TORL_2D |
INTEGER sn,ol,nNz,bi,bj,k |
./pkg/mdsio/mdsio_segxtorx_2d.F |
36 |
MDS_SEG4TORL_2D |
_RL arr(1-ol:sn+ol,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
56 |
MDS_SEG4TORS_2D |
SUBROUTINE MDS_SEG4TORS_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
74 |
MDS_SEG4TORS_2D |
INTEGER sn,ol,nNz,bi,bj,k |
./pkg/mdsio/mdsio_segxtorx_2d.F |
77 |
MDS_SEG4TORS_2D |
_RS arr(1-ol:sn+ol,nNz,nSx,nSy) |
./pkg/mdsio/mdsio_segxtorx_2d.F |
97 |
MDS_SEG8TORL_2D |
SUBROUTINE MDS_SEG8TORL_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr) |
./pkg/mdsio/mdsio_wr_metafiles.F |
132 |
MDS_WR_METAFILES |
dimList(1,3) = nNz |
./pkg/mdsio/mdsio_wr_metafiles.F |
134 |
MDS_WR_METAFILES |
dimList(3,3) = nNz |
./pkg/mdsio/mdsio_wr_metafiles.F |
136 |
MDS_WR_METAFILES |
IF (nNz.EQ.1) nDims=2 |
./pkg/mdsio/mdsio_wr_metafiles.F |
15 |
MDS_WR_METAFILES |
I nNx, nNy, nNz, |
./pkg/mdsio/mdsio_wr_metafiles.F |
199 |
MDS_WR_METAFILES |
dimList(1,3) = nNz |
./pkg/mdsio/mdsio_wr_metafiles.F |
201 |
MDS_WR_METAFILES |
dimList(3,3) = nNz |
./pkg/mdsio/mdsio_wr_metafiles.F |
203 |
MDS_WR_METAFILES |
IF (nNz.EQ.1) nDims=2 |
./pkg/mdsio/mdsio_wr_metafiles.F |
78 |
MDS_WR_METAFILES |
INTEGER nNx, nNy, nNz |
./pkg/mdsio/mdsio_write_field.F |
128 |
MDS_WRITE_FIELD |
INTEGER i1,i2,i,j,k,nNz |
./pkg/mdsio/mdsio_write_field.F |
165 |
MDS_WRITE_FIELD |
nNz = 1 + kHi - kLo |
./pkg/mdsio/mdsio_write_field.F |
225 |
MDS_WRITE_FIELD |
IF ( .NOT.useSingleCpuIO .AND. nNz.GT.size3dBuf ) THEN |
./pkg/mdsio/mdsio_write_field.F |
231 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: Nb Lev to write =', nNz, |
./pkg/mdsio/mdsio_write_field.F |
345 |
MDS_WRITE_FIELD |
irec = 1 + k-kLo + (irecord-1)*nNz |
./pkg/mdsio/mdsio_write_field.F |
379 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
./pkg/mdsio/mdsio_write_field.F |
382 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
./pkg/mdsio/mdsio_write_field.F |
393 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
./pkg/mdsio/mdsio_write_field.F |
396 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
./pkg/mdsio/mdsio_write_field.F |
420 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR4( sNx*sNy*nNz*nSx*nSy, shared3dBuf_r4 ) |
./pkg/mdsio/mdsio_write_field.F |
422 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR8( sNx*sNy*nNz*nSx*nSy, shared3dBuf_r8 ) |
./pkg/mdsio/mdsio_write_field.F |
443 |
MDS_WRITE_FIELD |
bBij = sNx*sNy*nNz*( bi-1 + (bj-1)*nSx ) |
./pkg/mdsio/mdsio_write_field.F |
481 |
MDS_WRITE_FIELD |
& +( k-kLo + (irecord-1)*nNz )*global_nTx*ySize |
./pkg/mdsio/mdsio_write_field.F |
501 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, sNx*sNy*nNz, myThid ) |
./pkg/mdsio/mdsio_write_field.F |
513 |
MDS_WRITE_FIELD |
i2 = bBij + sNx*sNy*nNz |
./pkg/mdsio/mdsio_write_field.F |
541 |
MDS_WRITE_FIELD |
dimList(1,3) = nNz |
./pkg/mdsio/mdsio_write_field.F |
543 |
MDS_WRITE_FIELD |
dimList(3,3) = nNz |
./pkg/mdsio/mdsio_write_field.F |
548 |
MDS_WRITE_FIELD |
IF ( nNz.EQ.1 ) nDims = 2 |
./pkg/mdsio/mdsio_write_field.F |
587 |
MDS_WRITE_FIELD |
dimList(1,3) = nNz |
./pkg/mdsio/mdsio_write_field.F |
589 |
MDS_WRITE_FIELD |
dimList(3,3) = nNz |
./pkg/mdsio/mdsio_write_field.F |
594 |
MDS_WRITE_FIELD |
IF ( nNz.EQ.1 ) nDims = 2 |
./pkg/mdsio/mdsio_writelocal.F |
14 |
MDS_WRITELOCAL |
I nNz, |
./pkg/mdsio/mdsio_writelocal.F |
195 |
MDS_WRITELOCAL |
IF ( .NOT.useSingleCpuIO .AND. nNz.GT.size3dBuf ) THEN |
./pkg/mdsio/mdsio_writelocal.F |
201 |
MDS_WRITELOCAL |
& ' MDS_WRITELOCAL: Nb Lev to write =', nNz, |
./pkg/mdsio/mdsio_writelocal.F |
225 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
228 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
239 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
242 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
290 |
MDS_WRITELOCAL |
bBij = sNx*sNy*nNz*( bi-1 + (bj-1)*nSx ) |
./pkg/mdsio/mdsio_writelocal.F |
294 |
MDS_WRITELOCAL |
CALL MDS_BYTESWAPR4( sNx*sNy*nNz, shared3dBuf_r4(i1) ) |
./pkg/mdsio/mdsio_writelocal.F |
296 |
MDS_WRITELOCAL |
CALL MDS_BYTESWAPR8( sNx*sNy*nNz, shared3dBuf_r8(i1) ) |
./pkg/mdsio/mdsio_writelocal.F |
330 |
MDS_WRITELOCAL |
DO k=1,nNz |
./pkg/mdsio/mdsio_writelocal.F |
335 |
MDS_WRITELOCAL |
& + ( k-1 + (irecord-1)*nNz )*global_nTx*ySize |
./pkg/mdsio/mdsio_writelocal.F |
355 |
MDS_WRITELOCAL |
length_of_rec = MDS_RECLEN( filePrec, sNx*sNy*nNz, myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
367 |
MDS_WRITELOCAL |
i2 = bBij + sNx*sNy*nNz |
./pkg/mdsio/mdsio_writelocal.F |
399 |
MDS_WRITELOCAL |
IF ( nNz.EQ.1 ) nDims = 2 |
./pkg/mdsio/mdsio_writelocal.F |
430 |
MDS_WRITELOCAL |
IF ( nNz.EQ.1 ) nDims = 2 |
./pkg/mdsio/mdsio_writelocal.F |
92 |
MDS_WRITELOCAL |
INTEGER nNz |
./pkg/rw/read_fld_xy_rl.F |
25 |
READ_FLD_XY_RL |
INTEGER nNz |
./pkg/rw/read_fld_xy_rl.F |
45 |
READ_FLD_XY_RL |
nNz=1 |
./pkg/rw/read_fld_xy_rl.F |
50 |
READ_FLD_XY_RL |
I fType, nNz, 1, nNz, |
./pkg/rw/read_fld_xy_rs.F |
25 |
READ_FLD_XY_RS |
INTEGER nNz |
./pkg/rw/read_fld_xy_rs.F |
45 |
READ_FLD_XY_RS |
nNz=1 |
./pkg/rw/read_fld_xy_rs.F |
50 |
READ_FLD_XY_RS |
I fType, nNz, 1, nNz, |
./pkg/rw/read_fld_xyz_rl.F |
25 |
READ_FLD_XYZ_RL |
INTEGER nNz |
./pkg/rw/read_fld_xyz_rl.F |
45 |
READ_FLD_XYZ_RL |
nNz=Nr |
./pkg/rw/read_fld_xyz_rl.F |
50 |
READ_FLD_XYZ_RL |
I fType, nNz, 1, nNz, |
./pkg/rw/read_fld_xyz_rs.F |
25 |
READ_FLD_XYZ_RS |
INTEGER nNz |
./pkg/rw/read_fld_xyz_rs.F |
45 |
READ_FLD_XYZ_RS |
nNz=Nr |
./pkg/rw/read_fld_xyz_rs.F |
50 |
READ_FLD_XYZ_RS |
I fType, nNz, 1, nNz, |
./pkg/rw/read_mflds.F |
245 |
READ_MFLDS_3D_RL |
I fPrec, nNz, myIter, myThid ) |
./pkg/rw/read_mflds.F |
273 |
READ_MFLDS_3D_RL |
INTEGER nNz |
./pkg/rw/read_mflds.F |
353 |
READ_MFLDS_3D_RL |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
110 |
READ_REC_XY_RL |
INTEGER nNz |
./pkg/rw/read_rec.F |
124 |
READ_REC_XY_RL |
nNz=1 |
./pkg/rw/read_rec.F |
128 |
READ_REC_XY_RL |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
169 |
READ_REC_XYZ_RS |
INTEGER nNz |
./pkg/rw/read_rec.F |
184 |
READ_REC_XYZ_RS |
nNz=Nr |
./pkg/rw/read_rec.F |
188 |
READ_REC_XYZ_RS |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
229 |
READ_REC_XYZ_RL |
INTEGER nNz |
./pkg/rw/read_rec.F |
244 |
READ_REC_XYZ_RL |
nNz=Nr |
./pkg/rw/read_rec.F |
248 |
READ_REC_XYZ_RL |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
260 |
READ_REC_3D_RS |
I fName, fPrec, nNz, |
./pkg/rw/read_rec.F |
281 |
READ_REC_3D_RS |
INTEGER nNz |
./pkg/rw/read_rec.F |
282 |
READ_REC_3D_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
312 |
READ_REC_3D_RS |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
324 |
READ_REC_3D_RL |
I fName, fPrec, nNz, |
./pkg/rw/read_rec.F |
345 |
READ_REC_3D_RL |
INTEGER nNz |
./pkg/rw/read_rec.F |
346 |
READ_REC_3D_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
376 |
READ_REC_3D_RL |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
518 |
READ_REC_XZ_RS |
I fName, fPrec, nNz, |
./pkg/rw/read_rec.F |
51 |
READ_REC_XY_RS |
INTEGER nNz |
./pkg/rw/read_rec.F |
537 |
READ_REC_XZ_RS |
INTEGER nNz |
./pkg/rw/read_rec.F |
538 |
READ_REC_XZ_RS |
_RS field(1-Olx:sNx+Olx,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
567 |
READ_REC_XZ_RS |
I fType, nNz, |
./pkg/rw/read_rec.F |
579 |
READ_REC_XZ_RL |
I fName, fPrec, nNz, |
./pkg/rw/read_rec.F |
599 |
READ_REC_XZ_RL |
INTEGER nNz |
./pkg/rw/read_rec.F |
600 |
READ_REC_XZ_RL |
_RL field(1-Olx:sNx+Olx,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
629 |
READ_REC_XZ_RL |
I fType, nNz, |
./pkg/rw/read_rec.F |
641 |
READ_REC_YZ_RS |
I fName, fPrec, nNz, |
./pkg/rw/read_rec.F |
65 |
READ_REC_XY_RS |
nNz=1 |
./pkg/rw/read_rec.F |
661 |
READ_REC_YZ_RS |
INTEGER nNz |
./pkg/rw/read_rec.F |
662 |
READ_REC_YZ_RS |
_RS field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
692 |
READ_REC_YZ_RS |
I fType, nNz, |
./pkg/rw/read_rec.F |
69 |
READ_REC_XY_RS |
I fType, nNz, 1, nNz, |
./pkg/rw/read_rec.F |
704 |
READ_REC_YZ_RL |
I fName, fPrec, nNz, |
./pkg/rw/read_rec.F |
724 |
READ_REC_YZ_RL |
INTEGER nNz |
./pkg/rw/read_rec.F |
725 |
READ_REC_YZ_RL |
_RL field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
755 |
READ_REC_YZ_RL |
I fType, nNz, |
./pkg/rw/write_fld_3d_rl.F |
17 |
WRITE_FLD_3D_RL |
INTEGER nNz |
./pkg/rw/write_fld_3d_rl.F |
18 |
WRITE_FLD_3D_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_fld_3d_rl.F |
56 |
WRITE_FLD_3D_RL |
I fType, nNz, 1, nNz, field, dummyRS, |
./pkg/rw/write_fld_3d_rl.F |
7 |
WRITE_FLD_3D_RL |
I pref, suff, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_3d_rs.F |
17 |
WRITE_FLD_3D_RS |
INTEGER nNz |
./pkg/rw/write_fld_3d_rs.F |
18 |
WRITE_FLD_3D_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_fld_3d_rs.F |
56 |
WRITE_FLD_3D_RS |
I fType, nNz, 1, nNz, dummyRL, field, |
./pkg/rw/write_fld_3d_rs.F |
7 |
WRITE_FLD_3D_RS |
I pref, suff, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rl.F |
102 |
WRITE_FLD_S3D_RL |
I fName, fPrec, kSiz, 1, nNz, locVar, |
./pkg/rw/write_fld_s3d_rl.F |
10 |
WRITE_FLD_S3D_RL |
I pref, suff, Ovl, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rl.F |
38 |
WRITE_FLD_S3D_RL |
INTEGER nNz |
./pkg/rw/write_fld_s3d_rl.F |
39 |
WRITE_FLD_S3D_RL |
_RL field(1-Ovl:sNx+Ovl,1-Ovl:sNy+Ovl,nNz,nSx,nSy) |
./pkg/rw/write_fld_s3d_rl.F |
68 |
WRITE_FLD_S3D_RL |
IF ( nNz.GT.kSiz ) THEN |
./pkg/rw/write_fld_s3d_rl.F |
70 |
WRITE_FLD_S3D_RL |
& ' Argument nNz (=', nNz, ' ) too large (> kSiz=', kSiz, ' )' |
./pkg/rw/write_fld_s3d_rl.F |
89 |
WRITE_FLD_S3D_RL |
DO k=1,nNz |
./pkg/rw/write_fld_s3d_rs.F |
102 |
WRITE_FLD_S3D_RS |
I fName, fPrec, kSiz, 1, nNz, locVar, |
./pkg/rw/write_fld_s3d_rs.F |
10 |
WRITE_FLD_S3D_RS |
I pref, suff, Ovl, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rs.F |
38 |
WRITE_FLD_S3D_RS |
INTEGER nNz |
./pkg/rw/write_fld_s3d_rs.F |
39 |
WRITE_FLD_S3D_RS |
_RS field(1-Ovl:sNx+Ovl,1-Ovl:sNy+Ovl,nNz,nSx,nSy) |
./pkg/rw/write_fld_s3d_rs.F |
68 |
WRITE_FLD_S3D_RS |
IF ( nNz.GT.kSiz ) THEN |
./pkg/rw/write_fld_s3d_rs.F |
70 |
WRITE_FLD_S3D_RS |
& ' Argument nNz (=', nNz, ' ) too large (> kSiz=', kSiz, ' )' |
./pkg/rw/write_fld_s3d_rs.F |
89 |
WRITE_FLD_S3D_RS |
DO k=1,nNz |
./pkg/rw/write_fld_xy_rl.F |
28 |
WRITE_FLD_XY_RL |
INTEGER nNz |
./pkg/rw/write_fld_xy_rl.F |
50 |
WRITE_FLD_XY_RL |
nNz=1 |
./pkg/rw/write_fld_xy_rl.F |
56 |
WRITE_FLD_XY_RL |
I fType, nNz, 1, nNz, field, dummyRS, |
./pkg/rw/write_fld_xy_rs.F |
28 |
WRITE_FLD_XY_RS |
INTEGER nNz |
./pkg/rw/write_fld_xy_rs.F |
50 |
WRITE_FLD_XY_RS |
nNz=1 |
./pkg/rw/write_fld_xy_rs.F |
56 |
WRITE_FLD_XY_RS |
I fType, nNz, 1, nNz, dummyRL, field, |
./pkg/rw/write_fld_xyz_rl.F |
28 |
WRITE_FLD_XYZ_RL |
INTEGER nNz |
./pkg/rw/write_fld_xyz_rl.F |
50 |
WRITE_FLD_XYZ_RL |
nNz=Nr |
./pkg/rw/write_fld_xyz_rl.F |
56 |
WRITE_FLD_XYZ_RL |
I fType, nNz, 1, nNz, field, dummyRS, |
./pkg/rw/write_fld_xyz_rs.F |
28 |
WRITE_FLD_XYZ_RS |
INTEGER nNz |
./pkg/rw/write_fld_xyz_rs.F |
50 |
WRITE_FLD_XYZ_RS |
nNz=Nr |
./pkg/rw/write_fld_xyz_rs.F |
56 |
WRITE_FLD_XYZ_RS |
I fType, nNz, 1, nNz, dummyRL, field, |
./pkg/rw/write_rec.F |
118 |
WRITE_REC_XY_RS |
INTEGER nNz |
./pkg/rw/write_rec.F |
133 |
WRITE_REC_XY_RS |
nNz=1 |
./pkg/rw/write_rec.F |
138 |
WRITE_REC_XY_RS |
I fType, nNz, 1, nNz, dummyRL, field, |
./pkg/rw/write_rec.F |
182 |
WRITE_REC_XY_RL |
INTEGER nNz |
./pkg/rw/write_rec.F |
197 |
WRITE_REC_XY_RL |
nNz=1 |
./pkg/rw/write_rec.F |
202 |
WRITE_REC_XY_RL |
I fType, nNz, 1, nNz, field, dummyRS, |
./pkg/rw/write_rec.F |
246 |
WRITE_REC_XYZ_RS |
INTEGER nNz |
./pkg/rw/write_rec.F |
261 |
WRITE_REC_XYZ_RS |
nNz=Nr |
./pkg/rw/write_rec.F |
266 |
WRITE_REC_XYZ_RS |
I fType, nNz, 1, nNz, dummyRL, field, |
./pkg/rw/write_rec.F |
310 |
WRITE_REC_XYZ_RL |
INTEGER nNz |
./pkg/rw/write_rec.F |
325 |
WRITE_REC_XYZ_RL |
nNz=Nr |
./pkg/rw/write_rec.F |
330 |
WRITE_REC_XYZ_RL |
I fType, nNz, 1, nNz, field, dummyRS, |
./pkg/rw/write_rec.F |
341 |
WRITE_REC_3D_RS |
I fName, fPrec, nNz, field, |
./pkg/rw/write_rec.F |
361 |
WRITE_REC_3D_RS |
INTEGER nNz |
./pkg/rw/write_rec.F |
362 |
WRITE_REC_3D_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
396 |
WRITE_REC_3D_RS |
I fType, nNz, 1, nNz, dummyRL, field, |
./pkg/rw/write_rec.F |
407 |
WRITE_REC_3D_RL |
I fName, fPrec, nNz, field, |
./pkg/rw/write_rec.F |
427 |
WRITE_REC_3D_RL |
INTEGER nNz |
./pkg/rw/write_rec.F |
428 |
WRITE_REC_3D_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
462 |
WRITE_REC_3D_RL |
I fType, nNz, 1, nNz, field, dummyRS, |
./pkg/rw/write_rec.F |
607 |
WRITE_REC_XZ_RS |
I fName, fPrec, nNz, |
./pkg/rw/write_rec.F |
626 |
WRITE_REC_XZ_RS |
INTEGER nNz |
./pkg/rw/write_rec.F |
627 |
WRITE_REC_XZ_RS |
_RS field(1-Olx:sNx+Olx,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
660 |
WRITE_REC_XZ_RS |
I fType, nNz, |
./pkg/rw/write_rec.F |
672 |
WRITE_REC_XZ_RL |
I fName, fPrec, nNz, |
./pkg/rw/write_rec.F |
692 |
WRITE_REC_XZ_RL |
INTEGER nNz |
./pkg/rw/write_rec.F |
693 |
WRITE_REC_XZ_RL |
_RL field(1-Olx:sNx+Olx,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
726 |
WRITE_REC_XZ_RL |
I fType, nNz, |
./pkg/rw/write_rec.F |
738 |
WRITE_REC_YZ_RS |
I fName, fPrec, nNz, |
./pkg/rw/write_rec.F |
758 |
WRITE_REC_YZ_RS |
INTEGER nNz |
./pkg/rw/write_rec.F |
759 |
WRITE_REC_YZ_RS |
_RS field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
793 |
WRITE_REC_YZ_RS |
I fType, nNz, |
./pkg/rw/write_rec.F |
805 |
WRITE_REC_YZ_RL |
I fName, fPrec, nNz, |
./pkg/rw/write_rec.F |
825 |
WRITE_REC_YZ_RL |
INTEGER nNz |
./pkg/rw/write_rec.F |
826 |
WRITE_REC_YZ_RL |
_RL field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
860 |
WRITE_REC_YZ_RL |
I fType, nNz, |
./pkg/autodiff/copy_ad_uv_outp.F |
119 |
COPY_AD_UV_OUTP |
CALL ADEXCH_UV_3D_RL( wSign,nNz,myThid, uFldOut,vFldOut ) |
./pkg/autodiff/copy_ad_uv_outp.F |
121 |
COPY_AD_UV_OUTP |
CALL ADEXCH_UV_3D_RL( uFldOut,vFldOut, wSign,nNz,myThid ) |
./pkg/autodiff/copy_ad_uv_outp.F |
13 |
COPY_AD_UV_OUTP |
I nNz, vType, myThid ) |
./pkg/autodiff/copy_ad_uv_outp.F |
43 |
COPY_AD_UV_OUTP |
INTEGER nNz |
./pkg/autodiff/copy_ad_uv_outp.F |
44 |
COPY_AD_UV_OUTP |
_RS uFldRS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_ad_uv_outp.F |
45 |
COPY_AD_UV_OUTP |
_RS vFldRS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_ad_uv_outp.F |
46 |
COPY_AD_UV_OUTP |
_RL uFldRL (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_ad_uv_outp.F |
47 |
COPY_AD_UV_OUTP |
_RL vFldRL (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_ad_uv_outp.F |
48 |
COPY_AD_UV_OUTP |
_RL uFldOut(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_ad_uv_outp.F |
49 |
COPY_AD_UV_OUTP |
_RL vFldOut(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_ad_uv_outp.F |
74 |
COPY_AD_UV_OUTP |
DO k=1,nNz |
./pkg/autodiff/copy_ad_uv_outp.F |
87 |
COPY_AD_UV_OUTP |
DO k=1,nNz |
./pkg/autodiff/copy_advar_outp.F |
104 |
COPY_ADVAR_OUTP |
CALL ADEXCH_3D_RL( nNz, myThid, outFld ) |
./pkg/autodiff/copy_advar_outp.F |
106 |
COPY_ADVAR_OUTP |
CALL ADEXCH_3D_RL( outFld, nNz, myThid ) |
./pkg/autodiff/copy_advar_outp.F |
13 |
COPY_ADVAR_OUTP |
I nNz, vType, myThid ) |
./pkg/autodiff/copy_advar_outp.F |
39 |
COPY_ADVAR_OUTP |
INTEGER nNz |
./pkg/autodiff/copy_advar_outp.F |
40 |
COPY_ADVAR_OUTP |
_RS inpFldRS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_advar_outp.F |
41 |
COPY_ADVAR_OUTP |
_RL inpFldRL(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_advar_outp.F |
42 |
COPY_ADVAR_OUTP |
_RL outFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/autodiff/copy_advar_outp.F |
67 |
COPY_ADVAR_OUTP |
DO k=1,nNz |
./pkg/autodiff/copy_advar_outp.F |
79 |
COPY_ADVAR_OUTP |
DO k=1,nNz |
./pkg/ctrl/ctrl_swapffields.F |
106 |
CTRL_SWAPFFIELDS_3D |
INTEGER nNz |
./pkg/ctrl/ctrl_swapffields.F |
107 |
CTRL_SWAPFFIELDS_3D |
_RL ffld0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/ctrl/ctrl_swapffields.F |
108 |
CTRL_SWAPFFIELDS_3D |
_RL ffld1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/ctrl/ctrl_swapffields.F |
119 |
CTRL_SWAPFFIELDS_3D |
DO k = 1,nNz |
./pkg/ctrl/ctrl_swapffields.F |
138 |
CTRL_SWAPFFIELDS_XZ |
I nNz, myThid ) |
./pkg/ctrl/ctrl_swapffields.F |
160 |
CTRL_SWAPFFIELDS_XZ |
INTEGER nNz |
./pkg/ctrl/ctrl_swapffields.F |
161 |
CTRL_SWAPFFIELDS_XZ |
_RL ffld0(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/ctrl/ctrl_swapffields.F |
162 |
CTRL_SWAPFFIELDS_XZ |
_RL ffld1(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/ctrl/ctrl_swapffields.F |
173 |
CTRL_SWAPFFIELDS_XZ |
DO k = 1,nNz |
./pkg/ctrl/ctrl_swapffields.F |
190 |
CTRL_SWAPFFIELDS_YZ |
I nNz, myThid ) |
./pkg/ctrl/ctrl_swapffields.F |
212 |
CTRL_SWAPFFIELDS_YZ |
INTEGER nNz |
./pkg/ctrl/ctrl_swapffields.F |
213 |
CTRL_SWAPFFIELDS_YZ |
_RL ffld0(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/ctrl/ctrl_swapffields.F |
214 |
CTRL_SWAPFFIELDS_YZ |
_RL ffld1(1-OLy:sNy+OLy,nNz,nSx,nSy) |
./pkg/ctrl/ctrl_swapffields.F |
225 |
CTRL_SWAPFFIELDS_YZ |
DO k = 1,nNz |
./pkg/ctrl/ctrl_swapffields.F |
86 |
CTRL_SWAPFFIELDS_3D |
I nNz, myThid ) |