| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1222 |
SOLIR |
_RL expmn |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1415 |
SOLIR |
td1t(i,j)=expmn(-tauto*csm(i,j)) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1416 |
SOLIR |
ts1t(i,j)=expmn(-1.66*tauto) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1973 |
DELEDD |
_RL expmn |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2006 |
DELEDD |
td = expmn(-taup*csm) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2049 |
DELEDD |
st2 = expmn(-akk*taup) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2097 |
SAGPOL |
_RL expmn |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2117 |
SAGPOL |
emt = expmn(-ttt) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2130 |
SAGPOL |
function expmn(fin) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2136 |
SAGPOL |
_RL fin,expmn |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2144 |
SAGPOL |
expmn = ((e4*fin + e3)*fin+e2)*fin+e1 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2145 |
SAGPOL |
expmn = expmn * expmn |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2146 |
SAGPOL |
expmn = one / (expmn * expmn) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
760 |
SORAD |
_RL expmn |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
879 |
SORAD |
df(i,j,k)=df(i,j,k)+0.0287*(1.-expmn(-0.00027*sqrt(x))) |
|
./pkg/fizhi/fizhi_swrad.F |
1221 |
SOLIR |
_RL expmn |
|
./pkg/fizhi/fizhi_swrad.F |
1414 |
SOLIR |
td1t(i,j)=expmn(-tauto*csm(i,j)) |
|
./pkg/fizhi/fizhi_swrad.F |
1415 |
SOLIR |
ts1t(i,j)=expmn(-1.66*tauto) |
|
./pkg/fizhi/fizhi_swrad.F |
1972 |
DELEDD |
_RL expmn |
|
./pkg/fizhi/fizhi_swrad.F |
2005 |
DELEDD |
td = expmn(-taup*csm) |
|
./pkg/fizhi/fizhi_swrad.F |
2048 |
DELEDD |
st2 = expmn(-akk*taup) |
|
./pkg/fizhi/fizhi_swrad.F |
2096 |
SAGPOL |
_RL expmn |
|
./pkg/fizhi/fizhi_swrad.F |
2116 |
SAGPOL |
emt = expmn(-ttt) |
|
./pkg/fizhi/fizhi_swrad.F |
2129 |
SAGPOL |
function expmn(fin) |
|
./pkg/fizhi/fizhi_swrad.F |
2135 |
SAGPOL |
_RL fin,expmn |
|
./pkg/fizhi/fizhi_swrad.F |
2143 |
SAGPOL |
expmn = ((e4*fin + e3)*fin+e2)*fin+e1 |
|
./pkg/fizhi/fizhi_swrad.F |
2144 |
SAGPOL |
expmn = expmn * expmn |
|
./pkg/fizhi/fizhi_swrad.F |
2145 |
SAGPOL |
expmn = one / (expmn * expmn) |
|
./pkg/fizhi/fizhi_swrad.F |
759 |
SORAD |
_RL expmn |
|
./pkg/fizhi/fizhi_swrad.F |
878 |
SORAD |
df(i,j,k)=df(i,j,k)+0.0287*(1.-expmn(-0.00027*sqrt(x))) |