source: LMDZ6/branches/LMDZ-INCA-Dyn/libf/phymar/Mod_PHY_S0_kkl.f90 @ 5446

Last change on this file since 5446 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_S0_kkl
2
3!--------------------------------------------------------------------------+
4!                                                     Fri 26-Apr-2013  MAR |
5!     module Mod_PHY_S0 contains the representation in vector   frame of   |
6!                       Variables of the Insolation Scheme                 |
7!                                                                          |
8!     version 3.p.4.1 created by H. Gallee,           Thu 25-Apr-2013      |
9!           Last Modification by H. Gallee,           Fri 26-Apr-2013      |
10!                                                                          |
11!--------------------------------------------------------------------------+
12
13
14      use Mod_Real
15
16
17      IMPLICIT NONE
18
19
20! Insolation        OUTPUT        Variables
21! -----------------------------------------
22
23      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)      ::  csz0S0       ! cosine (solar zenithal Distance)                          [-]
24      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)      ::  csz_S0       ! cosine (solar zenithal Distance), including Slope  Effect [-]
25      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:)    ::  cszkS0       ! cosine (solar zenithal Distance), including Mountain Mask [-]
26      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)      ::  slopS0       ! Cosine of Fall Line Angle                                 [-]
27      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:)      ::  omenS0       ! Fall Line Azimuth (Downslope Direction)                   [-]
28
29
30      end module Mod_PHY_S0_kkl
Note: See TracBrowser for help on using the repository browser.