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 |
2542 |
FLXCO2 |
dw=wlog-float(iw-2)*.3+4. |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2543 |
FLXCO2 |
x1=cah(1,iw-1)+(cah(1,iw)-cah(1,iw-1))*xx*dw |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2544 |
FLXCO2 |
x2=cah(ic-1,iw-1)+(cah(ic-1,iw)-cah(ic-1,iw-1))*xx*dw |
./pkg/fizhi/fizhi_swrad.F |
2515 |
FLXCO2 |
_RL xx,clog1,wlog,dc,dw,x1,x2,y2 |
./pkg/fizhi/fizhi_swrad.F |
2541 |
FLXCO2 |
dw=wlog-float(iw-2)*.3+4. |
./pkg/fizhi/fizhi_swrad.F |
2542 |
FLXCO2 |
x1=cah(1,iw-1)+(cah(1,iw)-cah(1,iw-1))*xx*dw |
./pkg/fizhi/fizhi_swrad.F |
2543 |
FLXCO2 |
x2=cah(ic-1,iw-1)+(cah(ic-1,iw)-cah(ic-1,iw-1))*xx*dw |