| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
2679 |
CTEI |
_RL getcon,cp,alhl,elocp,cpoel,t,p,s,qs,dqsdt,dq |
|
./pkg/fizhi/fizhi_moist.F |
2695 |
CTEI |
call QSAT ( t,p,qs,dqsdt,.true. ) |
|
./pkg/fizhi/fizhi_moist.F |
2697 |
CTEI |
krd = ( cpoel*t*(1+elocp*dqsdt) )/( 1 + 1.608*dqsdt*t ) |
|
./pkg/fizhi/fizhi_moist.F |
2699 |
CTEI |
kmm = ( 1+elocp*dqsdt )*( 1 + 0.392*cpoel*t ) |
|
./pkg/fizhi/fizhi_moist.F |
2700 |
CTEI |
. / ( 2+(1+1.608*cpoel*t)*elocp*dqsdt ) |
|
./pkg/fizhi/fizhi_turb.F |
181 |
TURBIO |
_RL dqsdt(nchp) |
|
./pkg/fizhi/fizhi_turb.F |
397 |
TURBIO |
call QSAT ( tground(i),utility(i),shg(i),dqsdt(i),.true. ) |
|
./pkg/fizhi/fizhi_turb.F |
490 |
TURBIO |
call STRIPIT (dqsdt,dqsdtstr,nchptot,nchp,istrip,1,nn) |