File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lwrad.F |
1454 |
IRRAD |
call TABLUP(k1,k2,m,n,np,nx,nc,nt,sco3,scopre,scotem, |
./pkg/fizhi/fizhi_lwrad.F |
562 |
IRRAD |
integer nx,no,nc,nh,nt |
./pkg/fizhi/fizhi_lwrad.F |
564 |
IRRAD |
parameter (nx=26,no=21,nc=24,nh=31,nt=7) |
./pkg/fizhi/fizhi_lwrad.F |
614 |
IRRAD |
_RL c1 (nx,nc,nt),c2 (nx,nc,nt),c3 (nx,nc,nt) |
./pkg/fizhi/fizhi_lwrad.F |
811 |
IRRAD |
do iw=1,nc |
./pkg/fizhi/fizhi_lwrad.F |
823 |
IRRAD |
do iw=1,nc |
./pkg/fizhi/fizhi_moist.F |
1231 |
RAS |
integer i,L,nc,ib,nt |
./pkg/bulk_force/bulkf_formula_lanl.F |
10 |
BULKF_FORMULA_LANL |
I uw, vw, us, Ta, Qa, nc, tsf_in, |
./pkg/bulk_force/bulkf_formula_lanl.F |
49 |
BULKF_FORMULA_LANL |
_RL nc ! fraction cloud cover |