| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_SEAICE.h |
158 |
NO PROCEDURE |
& OBWa , OBWh , OBWsl , OBWsn , OBWuice , OBWvice , |
|
./pkg/obcs/OBCS_SEAICE.h |
161 |
NO PROCEDURE |
_RL OBWa (1-Oly:sNy+Oly,nSx,nSy) |
|
./pkg/obcs/obcs_apply_seaice.F |
115 |
OBCS_APPLY_SEAICE |
AREA (Iobc,j,bi,bj) = OBWa (j,bi,bj) |
|
./pkg/obcs/obcs_exf_load.F |
147 |
OBCS_EXF_LOAD |
U OBWa, OBWa0, OBWa1, OBWafile, |
|
./pkg/obcs/obcs_init_variables.F |
274 |
OBCS_INIT_VARIABLES |
OBWa (j,bi,bj)=0. _d 0 |
|
./pkg/obcs/obcs_seaice_sponge.F |
153 |
OBCS_SEAICE_SPONGE_A |
& * ( AREA(i,j,bi,bj) - OBWa(j,bi,bj) ) |
|
./pkg/seaice/seaice_obcs_output.F |
100 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWa, 1,myIter,myThid) |