SURFEX v7.3
General documentation of Surfex
|
00001 ! ################## 00002 MODULE MODD_ASSIM 00003 ! ################## 00004 ! 00005 !!**** *MODD_ASSIM - declaration of keys for assimilation schemes 00006 !! 00007 !! PURPOSE 00008 !! ------- 00009 ! 00010 !! 00011 !!** IMPLICIT ARGUMENTS 00012 !! ------------------ 00013 !! None 00014 !! 00015 !! REFERENCE 00016 !! --------- 00017 !! 00018 !! AUTHOR 00019 !! ------ 00020 !! L. Jarlan *Meteo France* 00021 !! 00022 !! MODIFICATIONS 00023 !! ------------- 00024 !! Original 23/02/05 00025 ! 00026 ! Inclusion of OI constants 21/05/09 (J.-F. Mahfouf) 00027 !! Add all assim keys 04/2012 T.Aspelien 00028 ! 00029 !* 0. DECLARATIONS 00030 ! ------------ 00031 ! 00032 IMPLICIT NONE 00033 00034 !------------------------------------------------------------------------------- 00035 ! 00036 ! Assimilation Scheme Options: 00037 ! 00038 LOGICAL :: LASSIM ! Assimilation or not 00039 !'.TRUE.' 00040 !'.FALSE.' 00041 LOGICAL :: LPRINT ! Verbose 00042 LOGICAL :: LAROME ! If reading AROME fields 00043 LOGICAL :: LECSST ! Use ECMWF SST 00044 LOGICAL :: LAESST ! SST analysis performed 00045 LOGICAL :: LAESNM ! Update snow analysis 00046 LOGICAL :: LALADSURF 00047 LOGICAL :: LREAD_SST_FROM_FILE ! Read SST from file 00048 LOGICAL :: LWATERTG2 ! Use deep soil temperature as lake temp. 00049 LOGICAL :: LEXTRAP_SEA ! Extrapolation of sea points 00050 LOGICAL :: LEXTRAP_WATER ! Extrapolation of inland water points 00051 LOGICAL :: LEXTRAP_NATURE ! Extrapolation of nature points 00052 CHARACTER(LEN=5) :: CASSIM_ISBA ! OI/EKF 00053 CHARACTER(LEN=5) :: CASSIM ! type of correction 00054 ! 'PLUS ' (default) 00055 ! 'AVERA' 00056 ! '2DVAR' 00057 LOGICAL :: LPRT ! Running VARASSIM in a perturbation mode 00058 LOGICAL :: LSIM ! Running VARASSIM in a reading mode 00059 LOGICAL :: LBEV ! Running VARASSIM to evolve B 00060 LOGICAL :: LBFIXED 00061 INTEGER :: NOBSTYPE 00062 INTEGER, PARAMETER :: NOBSMAX = 3 00063 REAL,DIMENSION(NOBSMAX) :: YERROBS ! Observational standard deviation 00064 INTEGER,DIMENSION(NOBSMAX) :: INCO ! Select the type of observations to be assimilated 00065 INTEGER :: IVAR ! counter for ctnrl vars 00066 INTEGER :: NVAR ! number of cntrl vars 00067 INTEGER, PARAMETER :: NVARMAX = 4 00068 REAL,DIMENSION(NVARMAX) :: TPRT_M ! The perturbation amplitude (max dim) 00069 REAL,DIMENSION(NVARMAX) :: XSIGMA_M ! covariance of background errors if B is fixed (max dim) 00070 ! ! covariance of model errors if B evolving (max dim) 00071 CHARACTER(LEN=3),DIMENSION(NVARMAX) :: XVAR_M ! X is ctrl ! Name of control variables (syntax of surfex in PREP.txt file ) (max dim) 00072 CHARACTER(LEN=100),DIMENSION(NVARMAX) :: PREFIX_M ! The prefix of the control variables (in PREP.txt file) (max dim) 00073 INTEGER,DIMENSION(NVARMAX) :: INCV ! Select the control variables to be used 00074 REAL :: SCALE_Q ! scaling factor of Q matrix w.r.t. the initial B 00075 ! 00076 ! Constants and options of the soil OI analysis 00077 ! 00078 LOGICAL :: LHUMID, LIMVEG, LISSEW, L_SM_WP, LFGEL, LCLIM, LLDHMT, 00079 LOBSWG, LOBS2M 00080 INTEGER :: MINDJ, NNEBUL, NNEIGT, NNEIGW, NR_SM_WP, NECHGU, NTVGLA, 00081 NSEAICE, NLISSEW, IDJ, ITRAD 00082 REAL :: ANEBUL, RCLIMN, RCLIMTP, RCLIMTS, RCLIMV, RCLIMWP, RCLIMWS, 00083 SCOEFH, SCOEFT, SEVAP, SIGH2MO, SIGT2MO, SNEIGT, SNEIGW, 00084 SPRECIP, SWFC, V10MX, RD1, RTINER, WCRIN, WPMX, 00085 WSMX, TMERGL, RZHZ0G, RCLIMCA, RCLISST, RWPIA, RWPIB, 00086 RSNSA, RSNSB, SALBM, SALBB, SEMIB, SZZ0B, SMU0, 00087 SICE, SEMIM, RA_SM_WP, RSCALDW, SPRECIP2, 00088 REPSM, RCDTR, SIGHP1, SIGT2MR, SIGH2MR, RSABR, 00089 RARGR, GWFC, EWFC, GWWILT, EWWILT, G1WSAT, G2WSAT, 00090 REPS1, REPS2, REPS3, ADWR, SODELX(0:9), 00091 SIGWGO, SIGWGB, SIGW2B, RTHR_QC, SIGWGO_MAX, RSCAL_JAC 00092 ! 00093 END MODULE MODD_ASSIM