File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2516 |
FLXCO2 |
_RL xx,clog1,wlog,dc,dw,x1,x2,y2 |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2533 |
FLXCO2 |
clog1=log10(swc(i,j,k)*csm(i,j)) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2535 |
FLXCO2 |
ic=int( (clog1+3.15)*xx+1.) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2541 |
FLXCO2 |
dc=clog1-float(ic-2)*.3+3. |
./pkg/fizhi/fizhi_swrad.F |
2515 |
FLXCO2 |
_RL xx,clog1,wlog,dc,dw,x1,x2,y2 |
./pkg/fizhi/fizhi_swrad.F |
2532 |
FLXCO2 |
clog1=log10(swc(i,j,k)*csm(i,j)) |
./pkg/fizhi/fizhi_swrad.F |
2534 |
FLXCO2 |
ic=int( (clog1+3.15)*xx+1.) |
./pkg/fizhi/fizhi_swrad.F |
2540 |
FLXCO2 |
dc=clog1-float(ic-2)*.3+3. |