source: LMDZ5/trunk/libf/phymar/parptrs.F90 @ 5452

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

Inclusion de la physique de MAR


Integration of MAR physics

File size: 499 bytes
RevLine 
[2089]1MODULE PARPTRS
2
3
4#include "tsmbkind.h"
5
6IMPLICIT NONE
7
8SAVE
9
10INTEGER_M,parameter:: max_satellites=6
11INTEGER_M,parameter:: max_ddrs=2
12INTEGER_M,parameter:: max_statid_len=8
13INTEGER_M,parameter:: NSYNOP=1
14INTEGER_M,parameter:: NAIREP=2
15INTEGER_M,parameter:: NSATOB=3
16INTEGER_M,parameter:: NDRIBU=4
17INTEGER_M,parameter:: NTEMP=5
18INTEGER_M,parameter:: NPILOT=6
19INTEGER_M,parameter:: NSATEM=7
20INTEGER_M,parameter:: NPAOB=8
21INTEGER_M,parameter:: NSCATT=9
22INTEGER_M,parameter:: NTOVS=10
23END MODULE PARPTRS
Note: See TracBrowser for help on using the repository browser.