| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
59 |
NO PROCEDURE |
COMMON/ARRAYB/ UVM |
|
./pkg/seaice/SEAICE.h |
60 |
NO PROCEDURE |
_RL UVM (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
121 |
LSR |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
122 |
LSR |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
147 |
LSR |
& )*0.5 _d 0 * _recip_dxV(I,J,bi,bj) * UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
150 |
LSR |
& )*0.5 _d 0 * _recip_dxV(I,J,bi,bj) * UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
159 |
LSR |
BU(I,J,bi,bj)=(ONE-UVM(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
165 |
LSR |
& )*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
292 |
LSR |
AA3=AA2*UICE(I-1,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
297 |
LSR |
AA3=AA1*UICE(I+1,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
304 |
LSR |
URT(I)=URT(I)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
339 |
LSR |
& *UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
396 |
LSR |
& )*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
404 |
LSR |
& )*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
405 |
LSR |
BV(I,J,bi,bj)= (ONE-UVM(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
408 |
LSR |
& *UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
534 |
LSR |
& *VICE(I,J-1,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
546 |
LSR |
& *VICE(I,J+1,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
553 |
LSR |
VRT(J)=VRT(J)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
587 |
LSR |
& *UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
621 |
LSR |
UICE(I,J,bi,bj)=UICE(I,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
622 |
LSR |
VICE(I,J,bi,bj)=VICE(I,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_fixed.F |
95 |
SEAICE_INIT_FIXED |
UVM(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_init_fixed.F |
98 |
SEAICE_INIT_FIXED |
IF(mask_uice.GT.3.5 _d 0) UVM(i,j,bi,bj)=1. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
184 |
SEAICE_INIT_VARIA |
UVM(i,j,bi,bj)= 0.0 _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
205 |
SEAICE_INIT_VARIA |
UVM(i,J_obc,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
219 |
SEAICE_INIT_VARIA |
UVM(I_obc,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
239 |
SEAICE_INIT_VARIA |
UVM(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
245 |
SEAICE_INIT_VARIA |
UVM(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
250 |
SEAICE_INIT_VARIA |
UVM(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
282 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(UVM, myThid) |
|
./pkg/seaice/seaice_init_varia.F |
296 |
SEAICE_INIT_VARIA |
CALL PLOT_FIELD_XYRL( UVM , 'Current UVM ' , |
|
./pkg/seaice/seaice_monitor.F |
103 |
SEAICE_MONITOR |
& UVM, UVM, rAz, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
112 |
SEAICE_MONITOR |
& UVM, UVM, rAz, drF, dummyRL, myThid ) |