| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/profiles_interp.F |
138 |
PROFILES_INTERP |
if ((prof_i.NE.-10).AND.(prof_j.NE.-10)) then |
|
./pkg/profiles/profiles_interp.F |
150 |
PROFILES_INTERP |
tab_coeffs1(1,1)=theta(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
151 |
PROFILES_INTERP |
tab_coeffs1(1,2)=theta(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
152 |
PROFILES_INTERP |
tab_coeffs1(2,1)=theta(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
153 |
PROFILES_INTERP |
tab_coeffs1(2,2)=theta(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
154 |
PROFILES_INTERP |
tab_coeffs3(1,1)=maskC(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
155 |
PROFILES_INTERP |
tab_coeffs3(1,2)=maskC(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
156 |
PROFILES_INTERP |
tab_coeffs3(2,1)=maskC(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
157 |
PROFILES_INTERP |
tab_coeffs3(2,2)=maskC(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
159 |
PROFILES_INTERP |
tab_coeffs1(1,1)=salt(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
160 |
PROFILES_INTERP |
tab_coeffs1(1,2)=salt(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
161 |
PROFILES_INTERP |
tab_coeffs1(2,1)=salt(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
162 |
PROFILES_INTERP |
tab_coeffs1(2,2)=salt(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
163 |
PROFILES_INTERP |
tab_coeffs3(1,1)=maskC(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
164 |
PROFILES_INTERP |
tab_coeffs3(1,2)=maskC(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
165 |
PROFILES_INTERP |
tab_coeffs3(2,1)=maskC(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
166 |
PROFILES_INTERP |
tab_coeffs3(2,2)=maskC(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
168 |
PROFILES_INTERP |
tab_coeffs1(1,1)=uVel(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
169 |
PROFILES_INTERP |
tab_coeffs1(1,2)=uVel(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
170 |
PROFILES_INTERP |
tab_coeffs1(2,1)=uVel(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
171 |
PROFILES_INTERP |
tab_coeffs1(2,2)=uVel(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
172 |
PROFILES_INTERP |
tab_coeffs3(1,1)=maskW(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
173 |
PROFILES_INTERP |
tab_coeffs3(1,2)=maskW(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
174 |
PROFILES_INTERP |
tab_coeffs3(2,1)=maskW(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
175 |
PROFILES_INTERP |
tab_coeffs3(2,2)=maskW(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
177 |
PROFILES_INTERP |
tab_coeffs1(1,1)=vVel(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
178 |
PROFILES_INTERP |
tab_coeffs1(1,2)=vVel(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
179 |
PROFILES_INTERP |
tab_coeffs1(2,1)=vVel(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
180 |
PROFILES_INTERP |
tab_coeffs1(2,2)=vVel(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
181 |
PROFILES_INTERP |
tab_coeffs3(1,1)=maskS(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
182 |
PROFILES_INTERP |
tab_coeffs3(1,2)=maskS(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
183 |
PROFILES_INTERP |
tab_coeffs3(2,1)=maskS(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
184 |
PROFILES_INTERP |
tab_coeffs3(2,2)=maskS(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
189 |
PROFILES_INTERP |
tab_coeffs1(1,1)=pTracer(prof_i,prof_j,k,bi,bj,1) !SO |
|
./pkg/profiles/profiles_interp.F |
190 |
PROFILES_INTERP |
tab_coeffs1(1,2)=pTracer(prof_i+1,prof_j,k,bi,bj,1) !SE |
|
./pkg/profiles/profiles_interp.F |
191 |
PROFILES_INTERP |
tab_coeffs1(2,1)=pTracer(prof_i,prof_j+1,k,bi,bj,1) !NO |
|
./pkg/profiles/profiles_interp.F |
192 |
PROFILES_INTERP |
tab_coeffs1(2,2)=pTracer(prof_i+1,prof_j+1,k,bi,bj,1) !NZ |
|
./pkg/profiles/profiles_interp.F |
199 |
PROFILES_INTERP |
tab_coeffs3(1,1)=maskC(prof_i,prof_j,k,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
200 |
PROFILES_INTERP |
tab_coeffs3(1,2)=maskC(prof_i+1,prof_j,k,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
201 |
PROFILES_INTERP |
tab_coeffs3(2,1)=maskC(prof_i,prof_j+1,k,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
202 |
PROFILES_INTERP |
tab_coeffs3(2,2)=maskC(prof_i+1,prof_j+1,k,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
204 |
PROFILES_INTERP |
tab_coeffs1(1,1)=etan(prof_i,prof_j,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
205 |
PROFILES_INTERP |
tab_coeffs1(1,2)=etan(prof_i+1,prof_j,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
206 |
PROFILES_INTERP |
tab_coeffs1(2,1)=etan(prof_i,prof_j+1,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
207 |
PROFILES_INTERP |
tab_coeffs1(2,2)=etan(prof_i+1,prof_j+1,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
208 |
PROFILES_INTERP |
tab_coeffs3(1,1)=maskC(prof_i,prof_j,1,bi,bj) !SO |
|
./pkg/profiles/profiles_interp.F |
209 |
PROFILES_INTERP |
tab_coeffs3(1,2)=maskC(prof_i+1,prof_j,1,bi,bj) !SE |
|
./pkg/profiles/profiles_interp.F |
210 |
PROFILES_INTERP |
tab_coeffs3(2,1)=maskC(prof_i,prof_j+1,1,bi,bj) !NO |
|
./pkg/profiles/profiles_interp.F |
211 |
PROFILES_INTERP |
tab_coeffs3(2,2)=maskC(prof_i+1,prof_j+1,1,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp.F |
60 |
PROFILES_INTERP |
integer prof_i,prof_j |
|
./pkg/profiles/profiles_interp.F |
65 |
PROFILES_INTERP |
prof_j=-10 |
|
./pkg/profiles/profiles_interp.F |
78 |
PROFILES_INTERP |
prof_j=j |
|
./pkg/profiles/profiles_interp.F |
82 |
PROFILES_INTERP |
prof_j=prof_j |
|
./pkg/profiles/profiles_interp.F |
89 |
PROFILES_INTERP |
prof_j=j |
|
./pkg/profiles/profiles_interp.F |
93 |
PROFILES_INTERP |
prof_j=prof_j |
|
./pkg/profiles/profiles_interp_mean.F |
138 |
PROFILES_INTERP_MEAN |
if ((prof_i.NE.-10).AND.(prof_j.NE.-10)) then |
|
./pkg/profiles/profiles_interp_mean.F |
150 |
PROFILES_INTERP_MEAN |
tab_coeffs1(1,1)=prof_etan_mean(prof_i,prof_j,bi,bj) !SO |
|
./pkg/profiles/profiles_interp_mean.F |
151 |
PROFILES_INTERP_MEAN |
tab_coeffs1(1,2)=prof_etan_mean(prof_i+1,prof_j,bi,bj) !SE |
|
./pkg/profiles/profiles_interp_mean.F |
152 |
PROFILES_INTERP_MEAN |
tab_coeffs1(2,1)=prof_etan_mean(prof_i,prof_j+1,bi,bj) !NO |
|
./pkg/profiles/profiles_interp_mean.F |
153 |
PROFILES_INTERP_MEAN |
tab_coeffs1(2,2)=prof_etan_mean(prof_i+1,prof_j+1,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp_mean.F |
154 |
PROFILES_INTERP_MEAN |
tab_coeffs3(1,1)=maskC(prof_i,prof_j,1,bi,bj) !SO |
|
./pkg/profiles/profiles_interp_mean.F |
155 |
PROFILES_INTERP_MEAN |
tab_coeffs3(1,2)=maskC(prof_i+1,prof_j,1,bi,bj) !SE |
|
./pkg/profiles/profiles_interp_mean.F |
156 |
PROFILES_INTERP_MEAN |
tab_coeffs3(2,1)=maskC(prof_i,prof_j+1,1,bi,bj) !NO |
|
./pkg/profiles/profiles_interp_mean.F |
157 |
PROFILES_INTERP_MEAN |
tab_coeffs3(2,2)=maskC(prof_i+1,prof_j+1,1,bi,bj) !NZ |
|
./pkg/profiles/profiles_interp_mean.F |
60 |
PROFILES_INTERP_MEAN |
integer prof_i,prof_j |
|
./pkg/profiles/profiles_interp_mean.F |
65 |
PROFILES_INTERP_MEAN |
prof_j=-10 |
|
./pkg/profiles/profiles_interp_mean.F |
78 |
PROFILES_INTERP_MEAN |
prof_j=j |
|
./pkg/profiles/profiles_interp_mean.F |
82 |
PROFILES_INTERP_MEAN |
prof_j=prof_j |
|
./pkg/profiles/profiles_interp_mean.F |
89 |
PROFILES_INTERP_MEAN |
prof_j=j |
|
./pkg/profiles/profiles_interp_mean.F |
93 |
PROFILES_INTERP_MEAN |
prof_j=prof_j |