File |
Line number |
Procedure |
Code |
./pkg/obcs/obcs_apply_seaice.F |
138 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
140 |
OBCS_APPLY_SEAICE |
HEFF(i,Jobc-1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
141 |
OBCS_APPLY_SEAICE |
HEFF(i,Jobc-2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
144 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
146 |
OBCS_APPLY_SEAICE |
AREA(i,Jobc-1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
147 |
OBCS_APPLY_SEAICE |
AREA(i,Jobc-2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
150 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
152 |
OBCS_APPLY_SEAICE |
HSNOW(i,Jobc-1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
153 |
OBCS_APPLY_SEAICE |
HSNOW(i,Jobc-2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
157 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
159 |
OBCS_APPLY_SEAICE |
HSALT(i,Jobc-1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
160 |
OBCS_APPLY_SEAICE |
HSALT(i,Jobc-2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
177 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
179 |
OBCS_APPLY_SEAICE |
HEFF(i,Jobc+1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
180 |
OBCS_APPLY_SEAICE |
HEFF(i,Jobc+2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
183 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
185 |
OBCS_APPLY_SEAICE |
AREA(i,Jobc+1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
186 |
OBCS_APPLY_SEAICE |
AREA(i,Jobc+2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
189 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
191 |
OBCS_APPLY_SEAICE |
HSNOW(i,Jobc+1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
192 |
OBCS_APPLY_SEAICE |
HSNOW(i,Jobc+2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
196 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
198 |
OBCS_APPLY_SEAICE |
HSALT(i,Jobc+1,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
199 |
OBCS_APPLY_SEAICE |
HSALT(i,Jobc+2,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
216 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
218 |
OBCS_APPLY_SEAICE |
HEFF(Iobc-1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
219 |
OBCS_APPLY_SEAICE |
HEFF(Iobc-2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
222 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
224 |
OBCS_APPLY_SEAICE |
AREA(Iobc-1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
225 |
OBCS_APPLY_SEAICE |
AREA(Iobc-2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
228 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
230 |
OBCS_APPLY_SEAICE |
HSNOW(Iobc-1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
231 |
OBCS_APPLY_SEAICE |
HSNOW(Iobc-2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
235 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
237 |
OBCS_APPLY_SEAICE |
HSALT(Iobc-1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
238 |
OBCS_APPLY_SEAICE |
HSALT(Iobc-2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
255 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
257 |
OBCS_APPLY_SEAICE |
HEFF(Iobc+1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
258 |
OBCS_APPLY_SEAICE |
HEFF(Iobc+2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
261 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
263 |
OBCS_APPLY_SEAICE |
AREA(Iobc+1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
264 |
OBCS_APPLY_SEAICE |
AREA(Iobc+2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
267 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
269 |
OBCS_APPLY_SEAICE |
HSNOW(Iobc+1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
270 |
OBCS_APPLY_SEAICE |
HSNOW(Iobc+2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
274 |
OBCS_APPLY_SEAICE |
edge_val = 0.5 _d 0 * |
./pkg/obcs/obcs_apply_seaice.F |
276 |
OBCS_APPLY_SEAICE |
HSALT(Iobc+1,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
277 |
OBCS_APPLY_SEAICE |
HSALT(Iobc+2,j,bi,bj) = edge_val |
./pkg/obcs/obcs_apply_seaice.F |
51 |
OBCS_APPLY_SEAICE |
_RL edge_val |