File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lwrad.F |
2077 |
N2OEXPS |
_RL xc,xc1,xc2 |
./pkg/fizhi/fizhi_lwrad.F |
2093 |
N2OEXPS |
xc1=xc*xc |
./pkg/fizhi/fizhi_lwrad.F |
2094 |
N2OEXPS |
xc2=xc1*xc1 |
./pkg/fizhi/fizhi_lwrad.F |
2095 |
N2OEXPS |
n2oexp(i,j,k,2)=xc*xc1*xc2 |
./pkg/fizhi/fizhi_lwrad.F |
2225 |
COMEXPS |
_RL xc,xc1,xc2 |
./pkg/fizhi/fizhi_lwrad.F |
2242 |
COMEXPS |
xc1=xc*xc |
./pkg/fizhi/fizhi_lwrad.F |
2243 |
COMEXPS |
xc=xc1*xc1 |
./pkg/fizhi/fizhi_lwrad.F |
2245 |
COMEXPS |
comexp(i,j,k,2)=xc*xc1 |
./pkg/fizhi/fizhi_lwrad.F |
2255 |
COMEXPS |
xc1=xc*xc |
./pkg/fizhi/fizhi_lwrad.F |
2256 |
COMEXPS |
xc2=xc1*xc1 |
./pkg/fizhi/fizhi_lwrad.F |
2259 |
COMEXPS |
comexp(i,j,k,2)=xc1*xc2*xc |