| File |
Line number |
Procedure |
Code |
|
./pkg/atm_phys/ATM_PHYS_PARAMS.h |
22 |
NO PROCEDURE |
_RL atmPhys_dampUVfac(Nr) |
|
./pkg/atm_phys/ATM_PHYS_PARAMS.h |
39 |
NO PROCEDURE |
& atmPhys_tauDampUV, atmPhys_dampUVfac |
|
./pkg/atm_phys/atm_phys_check.F |
58 |
ATM_PHYS_CHECK |
CALL WRITE_1D_RL( atmPhys_dampUVfac, Nr, INDEX_K, |
|
./pkg/atm_phys/atm_phys_readparms.F |
39 |
ATM_PHYS_READPARMS |
& atmPhys_tauDampUV, atmPhys_dampUVfac, |
|
./pkg/atm_phys/atm_phys_readparms.F |
63 |
ATM_PHYS_READPARMS |
atmPhys_dampUVfac(k) = 1. _d 0 |
|
./pkg/atm_phys/atm_phys_readparms.F |
95 |
ATM_PHYS_READPARMS |
atmPhys_dampUVfac(k) = 0. _d 0 |
|
./pkg/atm_phys/atm_phys_readparms.F |
99 |
ATM_PHYS_READPARMS |
atmPhys_dampUVfac(k) = atmPhys_dampUVfac(k)/atmPhys_tauDampUV |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
159 |
ATM_PHYS_TENDENCY_APPLY_V |
IF ( atmPhys_dampUVfac(k).GT.zeroRL ) THEN |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
163 |
ATM_PHYS_TENDENCY_APPLY_V |
& - maskS(i,j,k,bi,bj)*vVel(i,j,k,bi,bj)*atmPhys_dampUVfac(k) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
165 |
ATM_PHYS_TENDENCY_APPLY_V |
& - vVel(i,j,k,bi,bj)*vVel(i,j,k,bi,bj)*atmPhys_dampUVfac(k) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
71 |
ATM_PHYS_TENDENCY_APPLY_U |
IF ( atmPhys_dampUVfac(k).GT.zeroRL ) THEN |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
75 |
ATM_PHYS_TENDENCY_APPLY_U |
& - maskW(i,j,k,bi,bj)*uVel(i,j,k,bi,bj)*atmPhys_dampUVfac(k) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
77 |
ATM_PHYS_TENDENCY_APPLY_U |
& - uVel(i,j,k,bi,bj)*uVel(i,j,k,bi,bj)*atmPhys_dampUVfac(k) |