File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1256 |
SOLIR |
_RL rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n) |
./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 |
1431 |
SOLIR |
ts2t(i,j)=ts1t(i,j) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1482 |
SOLIR |
ts(i,j,k,1)=ts1t(i,j) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1676 |
SOLUV |
_RL rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1798 |
SOLUV |
call SAGPOL (tauto,ssato,asyto,rs1t(i,j),ts1t(i,j)) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1808 |
SOLUV |
ts2t(i,j)=ts1t(i,j) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1854 |
SOLUV |
ts(i,j,k,1)=ts1t(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1255 |
SOLIR |
_RL rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n) |
./pkg/fizhi/fizhi_swrad.F |
1415 |
SOLIR |
ts1t(i,j)=expmn(-1.66*tauto) |
./pkg/fizhi/fizhi_swrad.F |
1430 |
SOLIR |
ts2t(i,j)=ts1t(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1481 |
SOLIR |
ts(i,j,k,1)=ts1t(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1675 |
SOLUV |
_RL rr1t(m,n),tt1t(m,n),td1t(m,n),rs1t(m,n),ts1t(m,n) |
./pkg/fizhi/fizhi_swrad.F |
1797 |
SOLUV |
call SAGPOL (tauto,ssato,asyto,rs1t(i,j),ts1t(i,j)) |
./pkg/fizhi/fizhi_swrad.F |
1807 |
SOLUV |
ts2t(i,j)=ts1t(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1853 |
SOLUV |
ts(i,j,k,1)=ts1t(i,j) |