| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/cah-dat.h |
20 |
NO PROCEDURE |
data ((cah(i,j),i=1,22),j= 6,10)/ |
|
./pkg/fizhi/cah-dat.h |
35 |
NO PROCEDURE |
data ((cah(i,j),i=1,22),j=11,15)/ |
|
./pkg/fizhi/cah-dat.h |
50 |
NO PROCEDURE |
data ((cah(i,j),i=1,22),j=16,19)/ |
|
./pkg/fizhi/cah-dat.h |
5 |
NO PROCEDURE |
data ((cah(i,j),i=1,22),j= 1, 5)/ |
|
./pkg/fizhi/fizhi_swrad.F |
2514 |
FLXCO2 |
_RL csm(m,n),swc(m,n,np+1),swh(m,n,np+1),cah(22,19) |
|
./pkg/fizhi/fizhi_swrad.F |
2550 |
FLXCO2 |
x1=cah(1,iw-1)+(cah(1,iw)-cah(1,iw-1))*xx*dw |
|
./pkg/fizhi/fizhi_swrad.F |
2551 |
FLXCO2 |
x2=cah(ic-1,iw-1)+(cah(ic-1,iw)-cah(ic-1,iw-1))*xx*dw |
|
./pkg/fizhi/fizhi_swrad.F |
2552 |
FLXCO2 |
y2=x2+(cah(ic,iw-1)-cah(ic-1,iw-1))*xx*dc |