File |
Line number |
Procedure |
Code |
./pkg/streamice/STREAMICE.h |
346 |
NO PROCEDURE |
& STREAMICE_umask, |
./pkg/streamice/STREAMICE.h |
357 |
NO PROCEDURE |
_RS STREAMICE_umask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/streamice/adstreamice_cg_solve.F |
165 |
ADSTREAMICE_CG_SOLVE |
if (STREAMICE_umask(i,j,bi,bj).eq.1) then |
./pkg/streamice/adstreamice_cg_solve.F |
166 |
ADSTREAMICE_CG_SOLVE |
if (STREAMICE_umask(i+colx,j+coly,bi,bj).eq.1) then |
./pkg/streamice/adstreamice_cg_solve.F |
182 |
ADSTREAMICE_CG_SOLVE |
if (STREAMICE_umask(i+colx,j+coly,bi,bj).eq.1) then |
./pkg/streamice/streamice_cg_functions.F |
129 |
STREAMICE_CG_ACTION |
if (STREAMICE_umask(i-1+inode,j-1+jnode,bi,bj).eq.1.0) then |
./pkg/streamice/streamice_cg_functions.F |
288 |
STREAMICE_CG_MAKE_A |
if (STREAMICE_umask(i-1+inodx,j-1+inody,bi,bj) |
./pkg/streamice/streamice_cg_functions.F |
303 |
STREAMICE_CG_MAKE_A |
if (STREAMICE_umask(i-1+jnodx,j-1+jnody,bi,bj) |
./pkg/streamice/streamice_cg_functions.F |
745 |
STREAMICE_CG_ADIAG |
if (STREAMICE_umask(i-1+inode,j-1+jnode,bi,bj).eq.1.0 .or. |
./pkg/streamice/streamice_cg_functions.F |
903 |
STREAMICE_CG_BOUND_VALS |
& ((STREAMICE_umask(i,j,bi,bj).eq.3.0) .OR. |
./pkg/streamice/streamice_cg_functions.F |
904 |
STREAMICE_CG_BOUND_VALS |
& (STREAMICE_umask(i,j+1,bi,bj).eq.3.0) .OR. |
./pkg/streamice/streamice_cg_functions.F |
905 |
STREAMICE_CG_BOUND_VALS |
& (STREAMICE_umask(i+1,j,bi,bj).eq.3.0) .OR. |
./pkg/streamice/streamice_cg_functions.F |
906 |
STREAMICE_CG_BOUND_VALS |
& (STREAMICE_umask(i+1,j+1,bi,bj).eq.3.0) .OR. |
./pkg/streamice/streamice_cg_functions.F |
957 |
STREAMICE_CG_BOUND_VALS |
if (STREAMICE_umask(i-1+inode,j-1+jnode,bi,bj).eq.1.0) then |
./pkg/streamice/streamice_cg_solve.F |
204 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve.F |
239 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve.F |
358 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_cg_solve.F |
384 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_cg_solve.F |
423 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_cg_solve.F |
451 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve.F |
472 |
STREAMICE_CG_SOLVE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve.F |
542 |
STREAMICE_CG_SOLVE |
I STREAMICE_umask, |
./pkg/streamice/streamice_cg_solve_matfree.F |
137 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve_matfree.F |
155 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve_matfree.F |
274 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_cg_solve_matfree.F |
300 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_cg_solve_matfree.F |
339 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_cg_solve_matfree.F |
367 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_solve_matfree.F |
388 |
STREAMICE_CG_SOLVE_MATFREE |
IF (STREAMICE_umask(i,j,bi,bj).eq.1.0) |
./pkg/streamice/streamice_cg_wrapper.F |
118 |
STREAMICE_CG_WRAPPER |
IF (STREAMICE_umask(i,j,bi,bj).ne.1.0) |
./pkg/streamice/streamice_cg_wrapper.F |
284 |
STREAMICE_CG_WRAPPER |
IF (STREAMICE_umask(i,j,bi,bj).eq.3.0) |
./pkg/streamice/streamice_driving_stress_ppm.F |
127 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
145 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
158 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
190 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
224 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
253 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
271 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
284 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
316 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_driving_stress_ppm.F |
99 |
STREAMICE_DRIVING_STRESS_PPM |
IF (STREAMICE_umask(i+k,j+l,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_get_fp_err_oad.F |
59 |
STREAMICE_GET_FP_ERR_OAD |
IF (STREAMICE_umask(i,j,bi,bj).eq.1) THEN |
./pkg/streamice/streamice_get_vel_fp_err.F |
59 |
STREAMICE_GET_VEL_FP_ERR |
IF (STREAMICE_umask(i,j,bi,bj).eq.1) THEN |
./pkg/streamice/streamice_get_vel_fp_err.F |
89 |
STREAMICE_GET_VEL_FP_ERR |
IF (STREAMICE_umask(i,j,bi,bj).eq.1) THEN |
./pkg/streamice/streamice_get_vel_resid_err.F |
126 |
STREAMICE_GET_VEL_RESID_ERR |
IF (STREAMICE_umask(i,j,bi,bj).eq.1) THEN |
./pkg/streamice/streamice_get_vel_resid_err.F |
96 |
STREAMICE_GET_VEL_RESID_ERR |
IF (STREAMICE_umask(i,j,bi,bj).eq.1) THEN |
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
91 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
IF (STREAMICE_umask(i,j,bi,bj).eq.1) THEN |
./pkg/streamice/streamice_init_varia.F |
156 |
STREAMICE_INIT_VARIA |
STREAMICE_umask(i,j,bi,bj) = 0.0 |
./pkg/streamice/streamice_petsc_numerate.F |
74 |
STREAMICE_PETSC_NUMERATE |
if (STREAMICE_umask (i,j,bi,bj).eq.1.0) THEN |
./pkg/streamice/streamice_velmask_upd.F |
107 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 0.0 |
./pkg/streamice/streamice_velmask_upd.F |
113 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 0.0 |
./pkg/streamice/streamice_velmask_upd.F |
119 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 0.0 |
./pkg/streamice/streamice_velmask_upd.F |
131 |
STREAMICE_VELMASK_UPD |
if(STREAMICE_umask(i+ki,j+kj,bi,bj).ne.0.0) then |
./pkg/streamice/streamice_velmask_upd.F |
132 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 3.0 |
./pkg/streamice/streamice_velmask_upd.F |
142 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 0.0 |
./pkg/streamice/streamice_velmask_upd.F |
148 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 0.0 |
./pkg/streamice/streamice_velmask_upd.F |
217 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RS( STREAMICE_umask, myThid ) |
./pkg/streamice/streamice_velmask_upd.F |
63 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i,j,bi,bj) = -1. _d 0 |
./pkg/streamice/streamice_velmask_upd.F |
80 |
STREAMICE_VELMASK_UPD |
if (STREAMICE_umask(i+ki,j+kj,bi,bj).eq.-1.0) then |
./pkg/streamice/streamice_velmask_upd.F |
81 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask (i+ki,j+kj,bi,bj) = 1.0 |
./pkg/streamice/streamice_velmask_upd.F |
93 |
STREAMICE_VELMASK_UPD |
if (STREAMICE_umask(i+ki,j+kj,bi,bj).ne.0.0) then |
./pkg/streamice/streamice_velmask_upd.F |
94 |
STREAMICE_VELMASK_UPD |
STREAMICE_umask(i+ki,j+kj,bi,bj) = 3.0 |