| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
783 |
SORAD |
_RL swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
792 |
SORAD |
so2(i,j,1)=0. |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
866 |
SORAD |
so2(i,j,k+1)=so2(i,j,k)+165.22*scal(i,j,k) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
878 |
SORAD |
x=so2(i,j,k)*csm(i,j) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
889 |
SORAD |
so2(i,j,k+1)=so2(i,j,k)+co2*789.*scal(i,j,k) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
897 |
SORAD |
call FLXCO2(m,n,np,so2,swh,csm,df) |
|
./pkg/fizhi/fizhi_swrad.F |
782 |
SORAD |
_RL swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1) |
|
./pkg/fizhi/fizhi_swrad.F |
791 |
SORAD |
so2(i,j,1)=0. |
|
./pkg/fizhi/fizhi_swrad.F |
865 |
SORAD |
so2(i,j,k+1)=so2(i,j,k)+165.22*scal(i,j,k) |
|
./pkg/fizhi/fizhi_swrad.F |
877 |
SORAD |
x=so2(i,j,k)*csm(i,j) |
|
./pkg/fizhi/fizhi_swrad.F |
888 |
SORAD |
so2(i,j,k+1)=so2(i,j,k)+co2*789.*scal(i,j,k) |
|
./pkg/fizhi/fizhi_swrad.F |
896 |
SORAD |
call FLXCO2(m,n,np,so2,swh,csm,df) |