File |
Line number |
Procedure |
Code |
./pkg/obcs/OBCS_SEAICE.h |
131 |
NO PROCEDURE |
& OBEa , OBEh , OBEsl , OBEsn , OBEuice , OBEvice , |
./pkg/obcs/OBCS_SEAICE.h |
134 |
NO PROCEDURE |
_RL OBEa (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_apply_seaice.F |
98 |
OBCS_APPLY_SEAICE |
AREA (Iobc,j,bi,bj) = OBEa (j,bi,bj) |
./pkg/obcs/obcs_exf_load.F |
121 |
OBCS_EXF_LOAD |
U OBEa, OBEa0, OBEa1, OBEafile, |
./pkg/obcs/obcs_init_variables.F |
254 |
OBCS_INIT_VARIABLES |
OBEa (j,bi,bj)=0. _d 0 |
./pkg/obcs/obcs_seaice_sponge.F |
126 |
OBCS_SEAICE_SPONGE_A |
& * ( AREA(i,j,bi,bj) - OBEa(j,bi,bj) ) |
./pkg/seaice/seaice_obcs_output.F |
91 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEa, 1,myIter,myThid) |