|
SURFEX v7.3
General documentation of Surfex
|
|
SURFEX v7.3
General documentation of Surfex
|
00001 ! ############################## 00002 MODULE MODD_GET_MESH_INDEX_CONF_PROJ 00003 ! ############################## 00004 ! 00005 !!**** *MODD_GRID_GAUSS - declaration of conformal grid characteristics for 00006 ! routine get_mesh_index_conf_proj 00007 !! 00008 !! PURPOSE 00009 !! ------- 00010 ! 00011 !! 00012 !!** IMPLICIT ARGUMENTS 00013 !! ------------------ 00014 !! None 00015 !! 00016 !! REFERENCE 00017 !! --------- 00018 !! 00019 !! AUTHOR 00020 !! ------ 00021 !! V. Masson *Meteo France* 00022 !! 00023 !! MODIFICATIONS 00024 !! ------------- 00025 !! Original 10/2006 00026 ! 00027 IMPLICIT NONE 00028 ! 00029 !* 0. DECLARATIONS 00030 ! ------------ 00031 ! 00032 REAL :: XLAT0 ! reference latitude 00033 REAL :: XLON0 ! reference longitude 00034 REAL :: XRPK ! projection parameter 00035 ! ! K=1 : stereographic north pole 00036 ! ! 0<K<1 : Lambert, north hemisphere 00037 ! ! K=0 : Mercator 00038 ! !-1<K<0 : Lambert, south hemisphere 00039 ! ! K=-1: stereographic south pole 00040 REAL :: XBETA ! angle between grid and reference longitude 00041 REAL :: XLATOR ! latitude of point of coordinates X=0, Y=0 00042 REAL :: XLONOR ! longitude of point of coordinates X=0, Y=0 00043 INTEGER :: NIMAX ! number of points in I direction 00044 INTEGER :: NJMAX ! number of points in J direction 00045 ! 00046 REAL, DIMENSION(:), ALLOCATABLE :: XXLIM ! X left limit of grid mesh (dim IIMAX+1) 00047 REAL, DIMENSION(:), ALLOCATABLE :: XYLIM ! Y bottom limit of grid mesh (dim IJMAX+1) 00048 00049 END MODULE MODD_GET_MESH_INDEX_CONF_PROJ
1.8.0
