| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
42 |
STREAMICE_ADV_FLUX_FL_X |
INTEGER i, j, bi, bj, Gi, Gj, k |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
67 |
STREAMICE_ADV_FLUX_FL_X |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
68 |
STREAMICE_ADV_FLUX_FL_X |
IF (((Gj .ge. 1) .and. (Gj .le. Ny)) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
105 |
STREAMICE_ADV_FLUX_FL_Y |
IF (((Gj.eq.1).and.(STREAMICE_hmask(i,j-1,bi,bj).eq.3.0)) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
157 |
STREAMICE_ADV_FLUX_FL_Y |
IF (((Gj.eq.Ny).and.(STREAMICE_hmask(i,j+1,bi,bj).eq.3.0)) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
42 |
STREAMICE_ADV_FLUX_FL_Y |
INTEGER i, j, bi, bj, Gi, Gj, k |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
67 |
STREAMICE_ADV_FLUX_FL_Y |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_adv_front.F |
119 |
STREAMICE_ADV_FRONT |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_adv_front.F |
120 |
STREAMICE_ADV_FRONT |
IF ((Gj .ge. 1) .and. (Gj .le. Ny)) THEN |
|
./pkg/streamice/streamice_adv_front.F |
45 |
STREAMICE_ADV_FRONT |
INTEGER Gi, Gj |
|
./pkg/streamice/streamice_advect_2dtracer.F |
121 |
STREAMICE_ADVECT_2DTRACER |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_advect_2dtracer.F |
122 |
STREAMICE_ADVECT_2DTRACER |
IF (((Gj .ge. 1) .and. (Gj .le. Ny)) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
170 |
STREAMICE_ADVECT_2DTRACER |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_advect_2dtracer.F |
40 |
STREAMICE_ADVECT_2DTRACER |
INTEGER myThid, myIter, Gi, Gj |
|
./pkg/streamice/streamice_advect_thickness.F |
229 |
STREAMICE_ADVECT_THICKNESS |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_advect_thickness.F |
230 |
STREAMICE_ADVECT_THICKNESS |
IF (((Gj .ge. 1) .and. (Gj .le. Ny)) |
|
./pkg/streamice/streamice_advect_thickness.F |
272 |
STREAMICE_ADVECT_THICKNESS |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_advect_thickness.F |
273 |
STREAMICE_ADVECT_THICKNESS |
IF (((Gj .ge. 1) .and. (Gj .le. Ny)) |
|
./pkg/streamice/streamice_advect_thickness.F |
340 |
STREAMICE_ADVECT_THICKNESS |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_advect_thickness.F |
41 |
STREAMICE_ADVECT_THICKNESS |
INTEGER i, j, bi, bj, Gi, Gj, k |
|
./pkg/streamice/streamice_cg_functions.F |
65 |
STREAMICE_CG_ACTION |
INTEGER iq, jq, inode, jnode, i, j, bi, bj, ilq, jlq, m, n,Gi,Gj |
|
./pkg/streamice/streamice_cg_functions.F |
81 |
STREAMICE_CG_ACTION |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_driving_stress.F |
105 |
STREAMICE_DRIVING_STRESS |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_driving_stress.F |
39 |
STREAMICE_DRIVING_STRESS |
& Gi, Gj |
|
./pkg/streamice/streamice_driving_stress_fd.F |
39 |
STREAMICE_DRIVING_STRESS_FD |
& Gi, Gj |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
205 |
STREAMICE_DRIVING_STRESS_PPM |
IF (Gj.eq.1.AND..NOT.STREAMICE_NS_periodic) THEN |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
233 |
STREAMICE_DRIVING_STRESS_PPM |
ELSEIF (Gj.eq.Ny.AND..NOT.STREAMICE_NS_periodic) THEN |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
39 |
STREAMICE_DRIVING_STRESS_PPM |
& Gi, Gj |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
74 |
STREAMICE_DRIVING_STRESS_PPM |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_init_fixed.F |
316 |
STREAMICE_INIT_FIXED |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_init_fixed.F |
36 |
STREAMICE_INIT_FIXED |
INTEGER bi, bj, i, j, Gi, Gj, m, k |
|
./pkg/streamice/streamice_init_fixed.F |
375 |
STREAMICE_INIT_FIXED |
IF (Gj.EQ.1 .AND. .NOT. STREAMICE_NS_periodic) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
401 |
STREAMICE_INIT_FIXED |
IF (Gj.EQ.Ny .AND. .NOT. STREAMICE_NS_periodic) THEN |
|
./pkg/streamice/streamice_init_varia.F |
202 |
STREAMICE_INIT_VARIA |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_init_varia.F |
204 |
STREAMICE_INIT_VARIA |
IF ((Gi.lt.Nx).and.(Gj.lt.Ny)) THEN |
|
./pkg/streamice/streamice_init_varia.F |
256 |
STREAMICE_INIT_VARIA |
Gj = (myYGlobalLo-1)+(bj-1)*sNy+j |
|
./pkg/streamice/streamice_init_varia.F |
258 |
STREAMICE_INIT_VARIA |
& (Gj.lt.Ny.OR.STREAMICE_NS_periodic)) THEN |
|
./pkg/streamice/streamice_init_varia.F |
39 |
STREAMICE_INIT_VARIA |
INTEGER i, j, k, bi, bj, Gi, Gj, r |