Subroutine AdvectScalar

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

Overview

$B%9%+%i!

Error Handling

Known Bugs

Note

Future Plans

Dependency

use dc_trace,      only: BeginSub, EndSub 
use gridset,       only: DimXMin, DimXMax, DimZMin, DimZMax
use average,       only: ss_avr_fs, ss_avr_sf
use differentiate, only: fs_dx_ss, sf_dz_ss

Input

real(8), intent(in)  :: fs_VelX_n(DimXMin:DimXMax, DimZMin:DimZMax)
real(8), intent(in)  :: sf_VelZ_n(DimXMin:DimXMax, DimZMin:DimZMax)
real(8), intent(in)  :: ss_Scalar_n(DimXMin:DimXMax, DimZMin:DimZMax)

Output

real(8), intent(out) :: ss_AdvScalar_n(DimXMin:DimXMax, DimZMin:DimZMax)