| File |
Line number |
Procedure |
Code |
|
./model/src/ini_p_ground.F |
406 |
ANALYLIC_THETA |
_RL ppN0, ppN1, ppN2, ppN3a, ppN3b, ppN4 |
|
./model/src/ini_p_ground.F |
417 |
ANALYLIC_THETA |
DATA ppN0 , ppN1 , ppN2 , ppN3a , ppN3b , ppN4 |
|
./model/src/ini_p_ground.F |
435 |
ANALYLIC_THETA |
a1tmp = (ttp1-ttp2y)*ppN1*ppN2/(ppN2-ppN1) |
|
./model/src/ini_p_ground.F |
437 |
ANALYLIC_THETA |
ppl = MIN(pNlev(k),ppN1) |
|
./model/src/ini_p_ground.F |
438 |
ANALYLIC_THETA |
ppm = MIN(MAX(pNlev(k),ppN1),ppN2) |
|
./model/src/ini_p_ground.F |
440 |
ANALYLIC_THETA |
ppr =( ppN0 + ABS(ppl-ppN0) - ppN1 )/(ppN2-ppN1) |
|
./model/src/ini_p_ground.F |
442 |
ANALYLIC_THETA |
& ( (1. _d 0 -ppr)*ttp1*ppN1**atm_kappa |
|
./model/src/ini_p_ground.F |
445 |
ANALYLIC_THETA |
& + a1tmp*(1. _d 0 /ppm - 1. _d 0/ppN1) |