| File |
Line number |
Procedure |
Code |
|
./pkg/bbl/BBL.h |
19 |
NO PROCEDURE |
_RL bbl_theta (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/bbl/BBL.h |
23 |
NO PROCEDURE |
COMMON /BBL_STATE_2D/ bbl_theta, bbl_salt, bbl_eta, bbl_rho_nr |
|
./pkg/bbl/bbl_calc_rho.F |
82 |
BBL_CALC_RHO |
I bbl_theta(1-OLx,1-OLy,bi,bj), |
|
./pkg/bbl/bbl_calc_rho.F |
99 |
BBL_CALC_RHO |
I bbl_theta(1-OLx,1-OLy,bi,bj), |
|
./pkg/bbl/bbl_calc_rhs.F |
119 |
BBL_CALC_RHS |
bbl_theta(i,j,bi,bj) = tLoc(i,j) |
|
./pkg/bbl/bbl_calc_rhs.F |
172 |
BBL_CALC_RHS |
IF ( ( bbl_theta(i,d,bi,bj) .EQ. tloc(i,d) ) .AND. |
|
./pkg/bbl/bbl_calc_rhs.F |
182 |
BBL_CALC_RHS |
bblTheta_d = bbl_theta(i,d,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
183 |
BBL_CALC_RHS |
bblTheta_r = bbl_theta(i,r,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
215 |
BBL_CALC_RHS |
bbl_theta(i,d,bi,bj) = tLoc(i,d) |
|
./pkg/bbl/bbl_calc_rhs.F |
219 |
BBL_CALC_RHS |
bbl_theta(i,r,bi,bj) = ( dVol * bblTheta_d + |
|
./pkg/bbl/bbl_calc_rhs.F |
274 |
BBL_CALC_RHS |
IF ( ( bbl_theta(i,d,bi,bj) .EQ. tloc(i,d) ) .AND. |
|
./pkg/bbl/bbl_calc_rhs.F |
284 |
BBL_CALC_RHS |
bblTheta_d = bbl_theta(i,d,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
285 |
BBL_CALC_RHS |
bblTheta_r = bbl_theta(i,r,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
317 |
BBL_CALC_RHS |
bbl_theta(i,d,bi,bj) = tLoc(i,d) |
|
./pkg/bbl/bbl_calc_rhs.F |
321 |
BBL_CALC_RHS |
bbl_theta(i,r,bi,bj) = ( dVol * bblTheta_d + |
|
./pkg/bbl/bbl_calc_rhs.F |
377 |
BBL_CALC_RHS |
IF ( ( bbl_theta(d,j,bi,bj) .EQ. tloc(d,j) ) .AND. |
|
./pkg/bbl/bbl_calc_rhs.F |
387 |
BBL_CALC_RHS |
bblTheta_d = bbl_theta(d,j,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
388 |
BBL_CALC_RHS |
bblTheta_r = bbl_theta(r,j,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
420 |
BBL_CALC_RHS |
bbl_theta(d,j,bi,bj) = tLoc(d,j) |
|
./pkg/bbl/bbl_calc_rhs.F |
424 |
BBL_CALC_RHS |
bbl_theta(r,j,bi,bj) = ( dVol * bblTheta_d + |
|
./pkg/bbl/bbl_calc_rhs.F |
479 |
BBL_CALC_RHS |
IF ( ( bbl_theta(d,j,bi,bj) .EQ. tloc(d,j) ) .AND. |
|
./pkg/bbl/bbl_calc_rhs.F |
489 |
BBL_CALC_RHS |
bblTheta_d = bbl_theta(d,j,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
490 |
BBL_CALC_RHS |
bblTheta_r = bbl_theta(r,j,bi,bj) |
|
./pkg/bbl/bbl_calc_rhs.F |
522 |
BBL_CALC_RHS |
bbl_theta(d,j,bi,bj) = tLoc(d,j) |
|
./pkg/bbl/bbl_calc_rhs.F |
526 |
BBL_CALC_RHS |
bbl_theta(r,j,bi,bj) = ( dVol * bblTheta_d + |
|
./pkg/bbl/bbl_calc_rhs.F |
542 |
BBL_CALC_RHS |
CALL EXCH_XY_RL( bbl_theta , myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
38 |
BBL_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( bbl_theta , 'BBLtheta', |
|
./pkg/bbl/bbl_init_varia.F |
42 |
BBL_INIT_VARIA |
bbl_theta(i,j,bi,bj) = theta(i,j,kBot,bi,bj) |
|
./pkg/bbl/bbl_init_varia.F |
58 |
BBL_INIT_VARIA |
& bbl_theta, 0, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
59 |
BBL_INIT_VARIA |
CALL EXCH_XY_RL( bbl_theta, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
125 |
BBL_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'bblTheta', bbl_theta, |
|
./pkg/bbl/bbl_read_pickup.F |
158 |
BBL_READ_PICKUP |
CALL EXCH_XY_RL( bbl_theta, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
77 |
BBL_WRITE_PICKUP |
& bbl_theta, -j, myIter, myThid ) |