Subroutine Buoyancy

• Developer: SUGIYAMA Ko-ichiro (sugiyama(at)gfd-dennou.org)
• Version: $Id: buoyancy.f90,v 1.4 2005/02/02 10:07:26 odakker Exp $
• Tag Name: $Name: $
• Change History:

Overview

Z 方向の運動方程式に含まれる浮力項の計算. 音波に関連しない項とみなし長い時間ステップで評価

Error Handling

Known Bugs

Note

Future Plans

Dependency

use dc_trace, only: BeginSub, EndSub
use gridset,  only: DimXMin, DimXMax, DimZMin, DimZMax
use basicset, only: ss_PotTempBasicZ
use arareprm, only: Grav
use average,  only: sf_avr_ss

Input

real(8), intent(in) :: ss_PotTemp_n(DimXMin:DimXMax, DimZMin:DimZMax) !温位

Output

real(8), intent(out) :: sf_Buoy_n(DimXMin:DimXMax, DimZMin:DimZMax) !浮力