AshFlow  0.1
ashflowmodel
 All Classes Files Functions Variables Pages
environment.f90
Go to the documentation of this file.
1 !********************************************************************************
6 !********************************************************************************
7 
8 MODULE envi_module
9 
10  IMPLICIT NONE
11 
12  ! Topography descriptors:
13  REAL*8 :: theta
14  REAL*8 :: fric
15 
16  ! Atmospheric Conditions:
17  REAL*8 :: gi
18  REAL*8 :: alpha
19  REAL*8 :: T_a
20  REAL*8 :: p
21  REAL*8 :: gas_constair
22  REAL*8 :: C_vair
23  !
24  SAVE
25 
26 CONTAINS
27 
28 !******************************************************************************
31 !******************************************************************************
32 
33  SUBROUTINE zmet
34 
35  IMPLICIT NONE
36 
37  alpha = p/(gas_constair*t_a)
38 
39  RETURN
40 
41  END SUBROUTINE zmet
42 
43 END MODULE envi_module
44 
envi_module
environment module This module contains all the variables related to the background environmental con...
Definition: environment.f90:8
envi_module::zmet
subroutine zmet
Meteorological conditions This subroutine is used to calculate atmospheric density, alpha.
Definition: environment.f90:33
Generated on Mon Jan 9 2017 11:30:33 for AshFlow by   doxygen 1.8.7