source: LMDZ6/branches/DYNAMICO-conv-GC/libf/phymar/parrint.F90 @ 5225

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

Inclusion de la physique de MAR


Integration of MAR physics

File size: 320 bytes
Line 
1MODULE PARRINT
2
3
4#include "tsmbkind.h"
5
6IMPLICIT NONE
7
8SAVE
9
10
11!     PARAMETERS REQUIRED FOR RADIATION INTERPOLATION
12
13INTEGER_M, PARAMETER :: JPRADCW=2
14INTEGER_M, PARAMETER :: JPRADCE=2
15INTEGER_M, PARAMETER :: JPRADCT=JPRADCW+JPRADCE
16INTEGER_M, PARAMETER :: JPRADFW=1
17INTEGER_M, PARAMETER :: JPRADFE=1
18END MODULE PARRINT
Note: See TracBrowser for help on using the repository browser.