File |
Line number |
Procedure |
Code |
./pkg/opps/opps_calc.F |
108 |
OPPS_CALC |
_RL wda(Nr), mda(Nr), pda(Nr,nTracer) |
./pkg/opps/opps_calc.F |
342 |
OPPS_CALC |
mda(k2) = (md(k2)*drF(k2)+md(k2+1)*drF(k2+1))/ |
./pkg/opps/opps_calc.F |
374 |
OPPS_CALC |
& (mda(k)*(Pda(k,ktr)-Paa(k,ktr)))*dt*recip_drF(k) |
./pkg/opps/opps_calc.F |
390 |
OPPS_CALC |
& (mda(k2m1)*(Pda(k2m1,ktr)-Paa(k2m1,ktr)) |
./pkg/opps/opps_calc.F |
391 |
OPPS_CALC |
& -mda(k2) *(Pda(k2,ktr) -Paa(k2,ktr)) ) |
./pkg/opps/opps_calc.F |
402 |
OPPS_CALC |
& mda(kmx)*(Pda(kmx,ktr)-Paa(kmx,ktr))*dt*recip_drF(kmx+1) |
./pkg/opps/opps_calc.F |
578 |
NLOPPS |
real wda(km),tda(km),sda(km),mda(km) |
./pkg/opps/opps_calc.F |
834 |
NLOPPS |
mda(k2) = (md(k2)*dz(k2)+md(k2+1)*dz(k2+1))/ |
./pkg/opps/opps_calc.F |
860 |
NLOPPS |
* (mda(k)*(tda(k)-taa(k)))*dt*recip_drF(k) |
./pkg/opps/opps_calc.F |
863 |
NLOPPS |
* (mda(k)*(sda(k)-saa(k)))*dt*recip_drF(k) |
./pkg/opps/opps_calc.F |
871 |
NLOPPS |
* (mda(k2-1)*(tda(k2-1)-taa(k2-1))- |
./pkg/opps/opps_calc.F |
872 |
NLOPPS |
* mda(k2)*(tda(k2)-taa(k2))) |
./pkg/opps/opps_calc.F |
876 |
NLOPPS |
* (mda(k2-1)*(sda(k2-1)-saa(k2-1))- |
./pkg/opps/opps_calc.F |
877 |
NLOPPS |
* mda(k2)*(sda(k2)-saa(k2))) |
./pkg/opps/opps_calc.F |
883 |
NLOPPS |
* (mda(kmx)*(tda(kmx)-taa(kmx)))* |
./pkg/opps/opps_calc.F |
887 |
NLOPPS |
* (mda(kmx)*(sda(kmx)-saa(kmx)))* |