File |
Line number |
Procedure |
Code |
./pkg/profiles/profiles_interp.F |
100 |
PROFILES_INTERP |
tab_coeffs1(q)=m_UE(i_cur(q),j_cur(q),k,bi,bj) |
./pkg/profiles/profiles_interp.F |
102 |
PROFILES_INTERP |
tab_coeffs1(q)=m_VN(i_cur(q),j_cur(q),k,bi,bj) |
./pkg/profiles/profiles_interp.F |
105 |
PROFILES_INTERP |
tab_coeffs1(q)=0. _d 0 |
./pkg/profiles/profiles_interp.F |
118 |
PROFILES_INTERP |
& +tab_coeffs1(q)*ponderations(q)/pondsSUM |
./pkg/profiles/profiles_interp.F |
68 |
PROFILES_INTERP |
_RL tab_coeffs1(NUM_INTERP_POINTS) |
./pkg/profiles/profiles_interp.F |
86 |
PROFILES_INTERP |
tab_coeffs1(q)=theta(i_cur(q),j_cur(q),k,bi,bj) |
./pkg/profiles/profiles_interp.F |
88 |
PROFILES_INTERP |
tab_coeffs1(q)=salt(i_cur(q),j_cur(q),k,bi,bj) |
./pkg/profiles/profiles_interp.F |
91 |
PROFILES_INTERP |
tab_coeffs1(q)=pTracer(i_cur(q),j_cur(q),k,bi,bj, |
./pkg/profiles/profiles_interp.F |
94 |
PROFILES_INTERP |
tab_coeffs1(q)=0. _d 0 |
./pkg/profiles/profiles_interp.F |
98 |
PROFILES_INTERP |
tab_coeffs1(q)=m_eta(i_cur(q),j_cur(q),bi,bj) |