File |
Line number |
Procedure |
Code |
./pkg/streamice/streamice_adv_flux_fl_x.F |
110 |
STREAMICE_ADV_FLUX_FL_X |
rdenom = (stencil(1)-stencil(0)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
112 |
STREAMICE_ADV_FLUX_FL_X |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_x.F |
114 |
STREAMICE_ADV_FLUX_FL_X |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
131 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_x.F |
132 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
135 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(0) + phi * |
./pkg/streamice/streamice_adv_flux_fl_x.F |
136 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
141 |
STREAMICE_ADV_FLUX_FL_X |
XFLUX (i,j,bi,bj) = uface * stencil(0) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
148 |
STREAMICE_ADV_FLUX_FL_X |
stencil (k) = TRAC(i-k,j,bi,bj) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
162 |
STREAMICE_ADV_FLUX_FL_X |
rdenom = (stencil(1)-stencil(0)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
164 |
STREAMICE_ADV_FLUX_FL_X |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_x.F |
166 |
STREAMICE_ADV_FLUX_FL_X |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
184 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_x.F |
185 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
188 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(0) + phi * |
./pkg/streamice/streamice_adv_flux_fl_x.F |
189 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
194 |
STREAMICE_ADV_FLUX_FL_X |
Xflux (i,j,bi,bj) = uface * stencil(0) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
44 |
STREAMICE_ADV_FLUX_FL_X |
_RL stencil (-1:1) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
96 |
STREAMICE_ADV_FLUX_FL_X |
stencil (k) = TRAC(i+k-1,j,bi,bj) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
113 |
STREAMICE_ADV_FLUX_FL_Y |
rdenom = (stencil(1)-stencil(0)) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
115 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_y.F |
117 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
134 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_y.F |
135 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
138 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(0) + phi * |
./pkg/streamice/streamice_adv_flux_fl_y.F |
139 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
144 |
STREAMICE_ADV_FLUX_FL_Y |
YFLUX (i,j,bi,bj) = vface * stencil(0) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
151 |
STREAMICE_ADV_FLUX_FL_Y |
stencil (k) = TRAC(i,j-k,bi,bj) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
165 |
STREAMICE_ADV_FLUX_FL_Y |
rdenom = (stencil(1)-stencil(0)) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
167 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_y.F |
169 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
186 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_y.F |
187 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
190 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(0) + phi * |
./pkg/streamice/streamice_adv_flux_fl_y.F |
191 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(1)-stencil(0))) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
196 |
STREAMICE_ADV_FLUX_FL_Y |
yflux (i,j,bi,bj) = vface * stencil(0) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
44 |
STREAMICE_ADV_FLUX_FL_Y |
_RL stencil (-1:1) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
99 |
STREAMICE_ADV_FLUX_FL_Y |
stencil (k) = TRAC(i,j+k-1,bi,bj) |