Subversion Repositories lagranto.wrf

Rev

Rev 15 | Rev 21 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15 Rev 17
Line 37... Line 37...
37 
 
 37 
 
38 
c     Input and output format for trajectories (see iotra.f)
 38 
c     Input and output format for trajectories (see iotra.f)
39 
      integer   inpmode
 39 
      integer   inpmode
40 
      integer   outmode
 40 
      integer   outmode
41 
 
 41 
 
- 
 
 42 
c     Missing data value
- 
 
 43 
      real      mdv
- 
 
 44 
      parameter (mdv = -999. )
- 
 
 45 
 
42 
c     Filename prefix (typically 'P')
 46 
c     Filename prefix (typically 'P')
43 
      character*1 prefix
 47 
      character*1 prefix
44 
      parameter   (prefix='P')
 48 
      parameter   (prefix='P')
45 
 
 49 
 
46 
c     Externals
 50 
c     Externals
Line 94... Line 98...
94 
      real                                   xmin,xmax       ! Zonal grid extension
 98 
      real                                   xmin,xmax       ! Zonal grid extension
95 
      real                                   ymin,ymax       ! Meridional grid extension
 99 
      real                                   ymin,ymax       ! Meridional grid extension
96 
      integer                                nx,ny,nz        ! Grid dimensions
 100 
      integer                                nx,ny,nz        ! Grid dimensions
97 
      real                                   dx,dy           ! Horizontal grid resolution
 101 
      real                                   dx,dy           ! Horizontal grid resolution
98 
      integer                                hem             ! Flag for hemispheric domain
 102 
      integer                                hem             ! Flag for hemispheric domain
99 
      real                                   mdv             ! Missing data value
 - 
 
100 
      real,allocatable, dimension (:,:)   :: mpx,mpy         ! Map scale factor in x,y direction
 103 
      real,allocatable, dimension (:,:)   :: mpx,mpy         ! Map scale factor in x,y direction
101 
      real,allocatable, dimension (:,:)   :: lat,lon         ! Map scale factor in x,y direction
 104 
      real,allocatable, dimension (:,:)   :: lat,lon         ! Map scale factor in x,y direction
102 
 
 105 
 
103 
c     Auxiliary variables
106 
c     Auxiliary variables
104 
      real                                   delta,rd
 107 
      real                                   delta,rd