source: LMDZ6/branches/DYNAMICO-conv-GC/libf/phymar/Mod_PHY____kkl.f90 @ 5006

Last change on this file since 5006 was 2089, checked in by Laurent Fairhead, 10 years ago

Inclusion de la physique de MAR


Integration of MAR physics

File size: 1.6 KB
Line 
1      module Mod_PHY____kkl
2
3!--------------------------------------------------------------------------+
4!                                                     Fri 14-Jun-2013  MAR |
5!     module Mod_PHY____kkl contains the main              variables of    |
6!            MAR PHYsical   Parameterizations                              |
7!                                                                          |
8!     version 3.p.4.1 created by H. Gallee,           Tue 12-Mar-2013      |
9!           Last Modification by H. Gallee,           Fri 14-Jun-2013      |
10!                                                                          |
11!--------------------------------------------------------------------------+
12
13
14      use Mod_Real
15
16
17      IMPLICIT NONE
18
19
20
21! PHY    INPUT        Variables
22! -----------------------------
23
24      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)    :: sh__AP        !  Topography          [m]
25      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)    :: sha_AP        !  Topography Anomaly  [m]
26      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)    :: slopAP        !  Topography Slope    [-]
27      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)    :: sloxAP        !  Topography Slope, x [-]
28      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)    :: sloyAP        !  Topography Slope, y [-]
29      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:)  :: MMskAP        !  Mountain   Mask     [-]
30
31
32! PHY    INPUT/OUTPUT Variables
33! -----------------------------
34
35
36
37! PHY    OUTPUT       Variables
38! -----------------------------
39
40
41      end module Mod_PHY____kkl
Note: See TracBrowser for help on using the repository browser.