| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
1014 |
NLOPPS |
taa(k2) = ttemp(k2+1) |
|
./pkg/opps/opps_calc.F |
1030 |
NLOPPS |
ttemp(k) = ttemp(k)- |
|
./pkg/opps/opps_calc.F |
1042 |
NLOPPS |
ttemp(k2) = ttemp(k2) + |
|
./pkg/opps/opps_calc.F |
1056 |
NLOPPS |
ttemp(kmx+1) = ttemp(kmx+1)+ |
|
./pkg/opps/opps_calc.F |
1067 |
NLOPPS |
taa(k2) = ttemp(k2+1) |
|
./pkg/opps/opps_calc.F |
1083 |
NLOPPS |
convadj(i,j,k2) = convadj(i,j,k2) + (ttemp(k2)- |
|
./pkg/opps/opps_calc.F |
1086 |
NLOPPS |
ta(i,k2) = ttemp(k2) |
|
./pkg/opps/opps_calc.F |
733 |
NLOPPS |
real ttemp(km),stemp(km),taa(km),saa(km) |
|
./pkg/opps/opps_calc.F |
812 |
NLOPPS |
ttemp(k)=ta(i,k) |
|
./pkg/opps/opps_calc.F |
839 |
NLOPPS |
Td(k)=ttemp(k) |
|
./pkg/opps/opps_calc.F |
840 |
NLOPPS |
Dd(k)=state1(stemp(k),ttemp(k),k) |
|
./pkg/opps/opps_calc.F |
867 |
NLOPPS |
D2=state1(stemp(k2+1),ttemp(k2+1),k2+1) |
|
./pkg/opps/opps_calc.F |
903 |
NLOPPS |
thmix=(dz1*ttemp(k2)+dz2*ttemp(k2+1))/(dz1+dz2) |
|
./pkg/cfc/cfc11_surfforcing.F |
45 |
CFC11_SURFFORCING |
_RL ttemp, ttemp2 |
|
./pkg/cfc/cfc11_surfforcing.F |
61 |
CFC11_SURFFORCING |
ttemp=( theta(i,j,k,bi,bj) + 273.16 _d 0)* 0.01 _d 0 |
|
./pkg/cfc/cfc11_surfforcing.F |
62 |
CFC11_SURFFORCING |
ttemp2=( B3_11 * ttemp + B2_11 )* |
|
./pkg/cfc/cfc11_surfforcing.F |
63 |
CFC11_SURFFORCING |
& ttemp + B1_11 |
|
./pkg/cfc/cfc11_surfforcing.F |
66 |
CFC11_SURFFORCING |
& + A2_11 / ttemp |
|
./pkg/cfc/cfc11_surfforcing.F |
67 |
CFC11_SURFFORCING |
& + A3_11 * log( ttemp ) |
|
./pkg/cfc/cfc11_surfforcing.F |
68 |
CFC11_SURFFORCING |
& + A4_11 * ttemp * ttemp |
|
./pkg/cfc/cfc12_surfforcing.F |
45 |
CFC12_SURFFORCING |
_RL ttemp, ttemp2 |
|
./pkg/cfc/cfc12_surfforcing.F |
61 |
CFC12_SURFFORCING |
ttemp=( theta(i,j,k,bi,bj) + 273.16 _d 0)* 0.01 _d 0 |
|
./pkg/cfc/cfc12_surfforcing.F |
62 |
CFC12_SURFFORCING |
ttemp2=( B3_12 * ttemp + B2_12 )* |
|
./pkg/cfc/cfc12_surfforcing.F |
63 |
CFC12_SURFFORCING |
& ttemp + B1_12 |
|
./pkg/cfc/cfc12_surfforcing.F |
66 |
CFC12_SURFFORCING |
& + A2_12 / ttemp |
|
./pkg/cfc/cfc12_surfforcing.F |
67 |
CFC12_SURFFORCING |
& + A3_12 * log( ttemp ) |
|
./pkg/cfc/cfc12_surfforcing.F |
68 |
CFC12_SURFFORCING |
& + A4_12 * ttemp * ttemp |
|
./pkg/dic/carbon_chem.F |
625 |
CARBON_COEFFS |
I ttemp,stemp, |
|
./pkg/dic/carbon_chem.F |
671 |
CARBON_COEFFS |
_RL ttemp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/dic/carbon_chem.F |
709 |
CARBON_COEFFS |
t = ttemp(i,j,1,bi,bj) |
|
./pkg/dic/carbon_chem.F |
844 |
CARBON_COEFFS_PRESSURE_DEP |
I ttemp,stemp, |
|
./pkg/dic/carbon_chem.F |
898 |
CARBON_COEFFS_PRESSURE_DEP |
_RL ttemp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/dic/carbon_chem.F |
975 |
CARBON_COEFFS_PRESSURE_DEP |
t = ttemp(i,j,Klevel,bi,bj) |
|
./pkg/dic/o2_surfforcing.F |
61 |
O2_SURFFORCING |
_RL ttemp |
|
./pkg/dic/o2_surfforcing.F |
73 |
O2_SURFFORCING |
ttemp = theta(i,j,k,bi,bj) |
|
./pkg/dic/o2_surfforcing.F |
78 |
O2_SURFFORCING |
& + sox2 * ttemp |
|
./pkg/dic/o2_surfforcing.F |
79 |
O2_SURFFORCING |
& + sox3 * ttemp*ttemp |
|
./pkg/dic/o2_surfforcing.F |
80 |
O2_SURFFORCING |
& + sox4 * ttemp*ttemp*ttemp |
|
./pkg/dic/o2_surfforcing.F |
91 |
O2_SURFFORCING |
aTT = 298.15 _d 0 -ttemp |
|
./pkg/dic/o2_surfforcing.F |
92 |
O2_SURFFORCING |
aTK = 273.15 _d 0 +ttemp |