| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
1011 |
NLOPPS |
tda(k2) = td(k2) |
|
./pkg/opps/opps_calc.F |
1022 |
NLOPPS |
tda(maxdepth) = td(maxdepth) |
|
./pkg/opps/opps_calc.F |
1031 |
NLOPPS |
* (mda(k)*(tda(k)-taa(k)))*dt*recip_drF(k) |
|
./pkg/opps/opps_calc.F |
1043 |
NLOPPS |
* (mda(k2-1)*(tda(k2-1)-taa(k2-1))- |
|
./pkg/opps/opps_calc.F |
1044 |
NLOPPS |
* mda(k2)*(tda(k2)-taa(k2))) |
|
./pkg/opps/opps_calc.F |
1057 |
NLOPPS |
* (mda(kmx)*(tda(kmx)-taa(kmx)))* |
|
./pkg/opps/opps_calc.F |
734 |
NLOPPS |
real wda(km),tda(km),sda(km),mda(km) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2198 |
CLDFLX |
_RL rra(m,n,np+1,2,2),tta(m,n,np+1,2,2),tda(m,n,np+1,2,2) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2242 |
CLDFLX |
tda(i,j,1,ih,1)=td(i,j,1,ih) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2245 |
CLDFLX |
tda(i,j,1,ih,2)=td(i,j,1,ih) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2255 |
CLDFLX |
tda(i,j,k,ih,1)= tda(i,j,k-1,ih,1)*td(i,j,k,ih) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2256 |
CLDFLX |
tta(i,j,k,ih,1)= tda(i,j,k-1,ih,1)*tt(i,j,k,ih) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2257 |
CLDFLX |
* +(tda(i,j,k-1,ih,1)*rr(i,j,k,ih) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2261 |
CLDFLX |
tda(i,j,k,ih,2)= tda(i,j,k,ih,1) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2276 |
CLDFLX |
tda(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*td(i,j,k,im) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2277 |
CLDFLX |
tta(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*tt(i,j,k,im) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2278 |
CLDFLX |
* +(tda(i,j,k-1,ih,im)*rr(i,j,k,im) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2419 |
CLDFLX |
tda(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*td(i,j,k,is) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2420 |
CLDFLX |
tta(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*tt(i,j,k,is) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2421 |
CLDFLX |
* +(tda(i,j,k-1,ih,im)*rr(i,j,k,is) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2453 |
CLDFLX |
fdndir(i,j)= tda(i,j,k-1,ih,im) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2454 |
CLDFLX |
xx = tda(i,j,k-1,ih,im)*rra(i,j,k,im,is) |
|
./pkg/fizhi/fizhi_swrad.F |
2197 |
CLDFLX |
_RL rra(m,n,np+1,2,2),tta(m,n,np+1,2,2),tda(m,n,np+1,2,2) |
|
./pkg/fizhi/fizhi_swrad.F |
2241 |
CLDFLX |
tda(i,j,1,ih,1)=td(i,j,1,ih) |
|
./pkg/fizhi/fizhi_swrad.F |
2244 |
CLDFLX |
tda(i,j,1,ih,2)=td(i,j,1,ih) |
|
./pkg/fizhi/fizhi_swrad.F |
2254 |
CLDFLX |
tda(i,j,k,ih,1)= tda(i,j,k-1,ih,1)*td(i,j,k,ih) |
|
./pkg/fizhi/fizhi_swrad.F |
2255 |
CLDFLX |
tta(i,j,k,ih,1)= tda(i,j,k-1,ih,1)*tt(i,j,k,ih) |
|
./pkg/fizhi/fizhi_swrad.F |
2256 |
CLDFLX |
* +(tda(i,j,k-1,ih,1)*rr(i,j,k,ih) |
|
./pkg/fizhi/fizhi_swrad.F |
2260 |
CLDFLX |
tda(i,j,k,ih,2)= tda(i,j,k,ih,1) |
|
./pkg/fizhi/fizhi_swrad.F |
2275 |
CLDFLX |
tda(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*td(i,j,k,im) |
|
./pkg/fizhi/fizhi_swrad.F |
2276 |
CLDFLX |
tta(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*tt(i,j,k,im) |
|
./pkg/fizhi/fizhi_swrad.F |
2277 |
CLDFLX |
* +(tda(i,j,k-1,ih,im)*rr(i,j,k,im) |
|
./pkg/fizhi/fizhi_swrad.F |
2418 |
CLDFLX |
tda(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*td(i,j,k,is) |
|
./pkg/fizhi/fizhi_swrad.F |
2419 |
CLDFLX |
tta(i,j,k,ih,im)= tda(i,j,k-1,ih,im)*tt(i,j,k,is) |
|
./pkg/fizhi/fizhi_swrad.F |
2420 |
CLDFLX |
* +(tda(i,j,k-1,ih,im)*rr(i,j,k,is) |
|
./pkg/fizhi/fizhi_swrad.F |
2452 |
CLDFLX |
fdndir(i,j)= tda(i,j,k-1,ih,im) |
|
./pkg/fizhi/fizhi_swrad.F |
2453 |
CLDFLX |
xx = tda(i,j,k-1,ih,im)*rra(i,j,k,im,is) |