Symbol | Description | Uses |
expmn | 19 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_swrad.F | 1229 | SOLIR |
_RL expmn |
./pkg/fizhi/fizhi_swrad.F | 1422 | SOLIR |
td1t(i,j)=expmn(-tauto*csm(i,j)) |
./pkg/fizhi/fizhi_swrad.F | 1423 | SOLIR |
ts1t(i,j)=expmn(-1.66*tauto) |
./pkg/fizhi/fizhi_swrad.F | 1980 | DELEDD |
_RL expmn |
./pkg/fizhi/fizhi_swrad.F | 2013 | DELEDD |
td = expmn(-taup*csm) |
./pkg/fizhi/fizhi_swrad.F | 2056 | DELEDD |
st2 = expmn(-akk*taup) |
./pkg/fizhi/fizhi_swrad.F | 2104 | SAGPOL |
_RL expmn |
./pkg/fizhi/fizhi_swrad.F | 2124 | SAGPOL |
emt = expmn(-ttt) |
./pkg/fizhi/fizhi_swrad.F | 2137 | SAGPOL |
function expmn(fin) |
./pkg/fizhi/fizhi_swrad.F | 2143 | SAGPOL |
_RL fin,expmn |
./pkg/fizhi/fizhi_swrad.F | 2151 | SAGPOL |
expmn = ((e4*fin + e3)*fin+e2)*fin+e1 |
./pkg/fizhi/fizhi_swrad.F | 2152 | SAGPOL |
expmn = expmn * expmn |
./pkg/fizhi/fizhi_swrad.F | 2153 | SAGPOL |
expmn = one / (expmn * expmn) |
./pkg/fizhi/fizhi_swrad.F | 767 | SORAD |
_RL expmn |
./pkg/fizhi/fizhi_swrad.F | 886 | SORAD |
df(i,j,k)=df(i,j,k)+0.0287*(1.-expmn(-0.00027*sqrt(x))) |