File |
Line number |
Procedure |
Code |
./pkg/aim_v23/AIM2DYN.h |
18 |
NO PROCEDURE |
& aim_drag, |
./pkg/aim_v23/AIM2DYN.h |
22 |
NO PROCEDURE |
_RL aim_drag (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/aim_v23/aim_aim2dyn.F |
89 |
AIM_AIM2DYN |
aim_drag(i,j,bi,bj) = DRAG(I2,0,myThid) |
./pkg/aim_v23/aim_do_physics.F |
225 |
AIM_DO_PHYSICS |
_EXCH_XY_RL( aim_drag, myThid ) |
./pkg/aim_v23/aim_tendency_apply.F |
111 |
AIM_TENDENCY_APPLY_U |
& -( aim_drag(i-1,j,bi,bj)+aim_drag(i,j,bi,bj) ) |
./pkg/aim_v23/aim_tendency_apply.F |
133 |
AIM_TENDENCY_APPLY_U |
& -( (1.-maskC(i-1,j,k-1,bi,bj))*aim_drag(i-1,j,bi,bj) |
./pkg/aim_v23/aim_tendency_apply.F |
134 |
AIM_TENDENCY_APPLY_U |
& +(1.-maskC( i ,j,k-1,bi,bj))*aim_drag( i ,j,bi,bj) |
./pkg/aim_v23/aim_tendency_apply.F |
299 |
AIM_TENDENCY_APPLY_V |
& -( aim_drag(i,j-1,bi,bj)+aim_drag(i,j,bi,bj) ) |
./pkg/aim_v23/aim_tendency_apply.F |
321 |
AIM_TENDENCY_APPLY_V |
& -( (1.-maskC(i,j-1,k-1,bi,bj))*aim_drag(i,j-1,bi,bj) |
./pkg/aim_v23/aim_tendency_apply.F |
322 |
AIM_TENDENCY_APPLY_V |
& +(1.-maskC(i, j ,k-1,bi,bj))*aim_drag(i, j ,bi,bj) |
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
100 |
ATM_STORE_AIM_WNDSTR |
& ( aim_drag(i,j-1,bi,bj) |
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
102 |
ATM_STORE_AIM_WNDSTR |
& + aim_drag(i, j ,bi,bj) |
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
119 |
ATM_STORE_AIM_WNDSTR |
& ( aim_drag(i-1,j,bi,bj)+aim_drag(i,j,bi,bj) ) |
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
131 |
ATM_STORE_AIM_WNDSTR |
& ( aim_drag(i,j-1,bi,bj)+aim_drag(i,j,bi,bj) ) |
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
85 |
ATM_STORE_AIM_WNDSTR |
& ( aim_drag(i-1,j,bi,bj) |
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
87 |
ATM_STORE_AIM_WNDSTR |
& + aim_drag( i ,j,bi,bj) |