| File |
Line number |
Procedure |
Code |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
106 |
GRDCHK_GET_OBCS_MASK |
call ACTIVE_READ_XZ( fname, tmpfldxz, iobcs, |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
114 |
GRDCHK_GET_OBCS_MASK |
& tmpfldxz(i,k,bi,bj) |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
51 |
GRDCHK_GET_OBCS_MASK |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
83 |
GRDCHK_GET_OBCS_MASK |
call ACTIVE_READ_XZ( fname, tmpfldxz, iobcs, |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
91 |
GRDCHK_GET_OBCS_MASK |
& tmpfldxz(i,k,bi,bj) |
|
./pkg/grdchk/grdchk_getadxx.F |
504 |
GRDCHK_GETADXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
|
./pkg/grdchk/grdchk_getadxx.F |
508 |
GRDCHK_GETADXX |
& xx_comp = tmpfldxz( itilepos,layer,itile,jtile ) |
|
./pkg/grdchk/grdchk_getadxx.F |
71 |
GRDCHK_GETADXX |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/grdchk/grdchk_getxx.F |
705 |
GRDCHK_GETXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
|
./pkg/grdchk/grdchk_getxx.F |
709 |
GRDCHK_GETXX |
& xx_comp_ref = tmpfldxz( itilepos,layer,itile,jtile ) |
|
./pkg/grdchk/grdchk_getxx.F |
713 |
GRDCHK_GETXX |
& tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_pert |
|
./pkg/grdchk/grdchk_getxx.F |
714 |
GRDCHK_GETXX |
call ACTIVE_WRITE_XZ( fname, tmpfldxz, icvrec, |
|
./pkg/grdchk/grdchk_getxx.F |
77 |
GRDCHK_GETXX |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/grdchk/grdchk_setxx.F |
703 |
GRDCHK_SETXX |
call ACTIVE_READ_XZ( fname, tmpfldxz, icvrec, |
|
./pkg/grdchk/grdchk_setxx.F |
707 |
GRDCHK_SETXX |
& tmpfldxz( itilepos,layer,itile,jtile ) = xx_comp_ref |
|
./pkg/grdchk/grdchk_setxx.F |
708 |
GRDCHK_SETXX |
call ACTIVE_WRITE_XZ( fname, tmpfldxz, icvrec, |
|
./pkg/grdchk/grdchk_setxx.F |
74 |
GRDCHK_SETXX |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/ctrl/ctrl_getobcsn.F |
127 |
CTRL_GETOBCSN |
call ACTIVE_READ_XZ( fnameobcsn, tmpfldxz, |
|
./pkg/ctrl/ctrl_getobcsn.F |
154 |
CTRL_GETOBCSN |
& modesv(k,nk,nz)*tmpfldxz(i,nk,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
163 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
166 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
175 |
CTRL_GETOBCSN |
xx_obcsn1(i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
190 |
CTRL_GETOBCSN |
tmpfldxz (i,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_getobcsn.F |
196 |
CTRL_GETOBCSN |
call ACTIVE_READ_XZ( fnameobcsn, tmpfldxz, |
|
./pkg/ctrl/ctrl_getobcsn.F |
223 |
CTRL_GETOBCSN |
& modesv(k,nk,nz)*tmpfldxz(i,nk,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
232 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
235 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
244 |
CTRL_GETOBCSN |
xx_obcsn1 (i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
72 |
CTRL_GETOBCSN |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/ctrl/ctrl_getobcss.F |
123 |
CTRL_GETOBCSS |
call ACTIVE_READ_XZ( fnameobcss, tmpfldxz, |
|
./pkg/ctrl/ctrl_getobcss.F |
150 |
CTRL_GETOBCSS |
& modesv(k,nk,nz)*tmpfldxz(i,nk,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
159 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
162 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
171 |
CTRL_GETOBCSS |
xx_obcss1(i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
186 |
CTRL_GETOBCSS |
tmpfldxz (i,k,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_getobcss.F |
192 |
CTRL_GETOBCSS |
call ACTIVE_READ_XZ( fnameobcss, tmpfldxz, |
|
./pkg/ctrl/ctrl_getobcss.F |
219 |
CTRL_GETOBCSS |
& modesv(k,nk,nz)*tmpfldxz(i,nk,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
228 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
231 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpz(k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
240 |
CTRL_GETOBCSS |
xx_obcss1 (i,k,bi,bj,iobcs) = tmpfldxz (i,k,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
73 |
CTRL_GETOBCSS |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |
|
./pkg/ecco/cost_obcsvol.F |
185 |
COST_OBCSVOL |
call ACTIVE_READ_XZ( fnamefldn, tmpfldxz, irec, doglobalread, |
|
./pkg/ecco/cost_obcsvol.F |
209 |
COST_OBCSVOL |
tmpx = tmpfldxz(i,1,bi,bj) |
|
./pkg/ecco/cost_obcsvol.F |
228 |
COST_OBCSVOL |
call ACTIVE_READ_XZ( fnameflds, tmpfldxz, irec, doglobalread, |
|
./pkg/ecco/cost_obcsvol.F |
251 |
COST_OBCSVOL |
tmpx = tmpfldxz(i,1,bi,bj) |
|
./pkg/ecco/cost_obcsvol.F |
77 |
COST_OBCSVOL |
_RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy) |