| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_SEAICE.h |
104 |
NO PROCEDURE |
& OBSa , OBSh , OBSsl , OBSsn , OBSuice , OBSvice , |
|
./pkg/obcs/OBCS_SEAICE.h |
112 |
NO PROCEDURE |
_RL OBSvice (1-Olx:sNx+Olx,nSx,nSy) |
|
./pkg/obcs/obcs_adjust_uvice.F |
113 |
OBCS_ADJUST_UVICE |
& min(OBSvice(I,bi,bj),vFld(I,OB_Js(I,bi,bj)+1,bi,bj)) |
|
./pkg/obcs/obcs_adjust_uvice.F |
116 |
OBCS_ADJUST_UVICE |
vFld(I,OB_Js(I,bi,bj)+1,bi,bj)=OBSvice(I,bi,bj) |
|
./pkg/obcs/obcs_apply_uvice.F |
156 |
OBCS_APPLY_UVICE |
vFld(i,Jobc+1,bi,bj) = OBSvice(i,bi,bj) |
|
./pkg/obcs/obcs_apply_uvice.F |
159 |
OBCS_APPLY_UVICE |
& vFld(i,Jobc,bi,bj) = OBSvice(i,bi,bj) |
|
./pkg/obcs/obcs_exf_load.F |
100 |
OBCS_EXF_LOAD |
U OBSvice,OBSvice0,OBSvice1,OBSvicefile, |
|
./pkg/obcs/obcs_init_variables.F |
245 |
OBCS_INIT_VARIABLES |
OBSvice (i,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_obcs_output.F |
87 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSvice, 6,myIter,myThid) |