| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_interp_linear.F |
138 |
FLT_TRILINEAR |
INTEGER i1, j1, k1, i2, j2, k2 |
|
./pkg/flt/flt_interp_linear.F |
177 |
FLT_TRILINEAR |
j2 = j1 + 1 |
|
./pkg/flt/flt_interp_linear.F |
188 |
FLT_TRILINEAR |
& + ddx * ddy *var(i2,j2,k1,bi,bj) ) |
|
./pkg/flt/flt_interp_linear.F |
190 |
FLT_TRILINEAR |
& + (1.-ddx)* ddy *var(i1,j2,k1,bi,bj) ) ) |
|
./pkg/flt/flt_interp_linear.F |
192 |
FLT_TRILINEAR |
& + ddx * ddy *var(i2,j2,k2,bi,bj) ) |
|
./pkg/flt/flt_interp_linear.F |
194 |
FLT_TRILINEAR |
& + (1.-ddx)* ddy *var(i1,j2,k2,bi,bj) ) ) |
|
./pkg/flt/flt_interp_linear.F |
230 |
FLT_BILINEAR2D |
INTEGER i1, j1, i2, j2 |
|
./pkg/flt/flt_interp_linear.F |
261 |
FLT_BILINEAR2D |
j2 = j1 + 1 |
|
./pkg/flt/flt_interp_linear.F |
267 |
FLT_BILINEAR2D |
& + ddx * ddy *var(i2,j2,bi,bj) ) |
|
./pkg/flt/flt_interp_linear.F |
269 |
FLT_BILINEAR2D |
& + (1.-ddx)* ddy *var(i1,j2,bi,bj) ) |
|
./pkg/flt/flt_interp_linear.F |
39 |
FLT_BILINEAR |
INTEGER i1, j1, i2, j2, klp |
|
./pkg/flt/flt_interp_linear.F |
78 |
FLT_BILINEAR |
j2 = j1 + 1 |
|
./pkg/flt/flt_interp_linear.F |
85 |
FLT_BILINEAR |
& + ddx * ddy *var(i2,j2,kl,bi,bj) ) |
|
./pkg/flt/flt_interp_linear.F |
87 |
FLT_BILINEAR |
& + (1.-ddx)* ddy *var(i1,j2,kl,bi,bj) ) |
|
./pkg/flt/flt_interp_linear.F |
92 |
FLT_BILINEAR |
u22 = ( var(i2,j2,kl,bi,bj)+var(i2,j2,klp,bi,bj) )*0.5 _d 0 |
|
./pkg/flt/flt_interp_linear.F |
93 |
FLT_BILINEAR |
u12 = ( var(i1,j2,kl,bi,bj)+var(i1,j2,klp,bi,bj) )*0.5 _d 0 |
|
./pkg/gridalt/gridalt_update.F |
30 |
GRIDALT_UPDATE |
integer i1,i2,j1,j2,bi,bj |
|
./pkg/gridalt/gridalt_update.F |
43 |
GRIDALT_UPDATE |
j2 = sNy |
|
./pkg/gridalt/gridalt_update.F |
53 |
GRIDALT_UPDATE |
do j = j1,j2 |
|
./pkg/gridalt/gridalt_update.F |
74 |
GRIDALT_UPDATE |
do j = j1,j2 |
|
./pkg/gridalt/make_phys_grid.F |
121 |
MAKE_PHYS_GRID |
do j = j1,j2 |
|
./pkg/gridalt/make_phys_grid.F |
48 |
MAKE_PHYS_GRID |
integer i1,i2,j1,j2,bi,bj |
|
./pkg/gridalt/make_phys_grid.F |
7 |
MAKE_PHYS_GRID |
& nSx,nSy,i1,i2,j1,j2,bi,bj,Nrphys,Lbot,dpphys,numlevphys,nlperdyn) |
|
./pkg/gridalt/make_phys_grid.F |
96 |
MAKE_PHYS_GRID |
do j = j1,j2 |
|
./pkg/seaice/lsr.F |
53 |
LSR |
INTEGER i, j, m, bi, bj, j1, j2, im, jm |