We are currently trying to implement a model with data assimilation system and we are now following the steps in https://www.myroms.org/wiki/4DVar_Norma ... n_Tutorial. Unfortunately, a few errors showed up when we tried to compile ROMS (we are using the NORMALIZATION option the cpp file: ROMS/Include/wc13.h). We didn't expect the compilation to fail, since this is a cpp file provided with the ROMS source code,.
The compilation throws the following error:
Code: Select all
563 | IF (allocated(FOURDVAR(ng) % NobsSurvey)) THEN
| 1
Error: Symbol 'fourdvar' at (1) has no IMPLICIT typeI'm wondering if you would have any advice on dealing with this issue. The version of ROMS we are using is displayed at the end of this message.
I appreciate your time,
Dalton Sasaki
Code: Select all
[ROMS/Modules/mod_fourdvar.F (lines 146-155)]
(...)
# ifdef OBSERVATIONS
!-----------------------------------------------------------------------
! Define T_FOURDVAR structure.
!-----------------------------------------------------------------------
!
TYPE T_FOURDVAR
integer , allocatable :: NobsSurvey(:)
integer , allocatable :: ObsCount(:)
integer , allocatable :: ObsReject(:)
# ifdef FOUR_DVAR
real(r8), allocatable :: BackCost(:)
real(r8), allocatable :: Cost0(:)
(...)
Code: Select all
[ROMS/Include/globaldefs.h]
(...)
#if defined ARRAY_MODES || \
defined CLIPPING || \
defined I4DVAR || \
defined I4DVAR_ANA_SENSITIVITY || \
defined RBL4DVAR || \
defined R4DVAR || \
defined SENSITIVITY_4DVAR || \
defined SPLIT_I4DVAR || \
defined SPLIT_RBL4DVAR || \
defined SPLIT_R4DVAR || \
defined SPLIT_SP4DVAR || \
defined SP4DVAR || \
defined TLM_CHECK || \
defined TL_RBL4DVAR || \
defined TL_R4DVAR || \
defined VERIFICATION
# define OBSERVATIONS
(...)
#endifCode: Select all
[ROMS/Include/wc13.h]
/*
** svn $Id: wc13.h 77 2020-05-13 03:06:55Z arango $
*******************************************************************************
** Copyright (c) 2002-2023 The ROMS/TOMS Group **
** Licensed under a MIT/X style license **
** See License_ROMS.txt **
*******************************************************************************
**
** Options for the California Current System, 1/3 degree resolution.
**
** Application flag: WC13
** Input script: roms_wc13.in
** s4dvar.in
**
** Available Drivers options: choose only one and activate it in the
** build.sh script (MY_CPP_FLAGS definition)
**
** AD_SENSITIVITY Adjoint Sensitivity Driver
** AFT_EIGENMODES Adjoint Finite Time Eigenmodes
** ARRAY_MODES Stabilized representer matrix array modes
** CLIPPING Stabilized representer matrix clipped analysis
** CORRELATION Background-error Correlation Check
** GRADIENT_CHECK TLM/ADM Gradient Check
** FORCING_SV Forcing Singular Vectors
** FT_EIGENMODES Finite Time Eigenmodes
** I4DVAR Incremental, strong constraint 4D-Var
** NLM_DRIVER Nonlinear Basic State trajectory
** NORMALIZATION Background error Covariance Normalization
** OPT_PERTURBATION Optimal perturbations
** PICARD_TEST Picard Iterations Test
** RBL4DVAR Strong/Weak constraint RBL4D-Var
** R4DVAR Stronf/Weak constraint R4D-Var
** R_SYMMETRY Representer Matrix Symmetry Test
** SANITY_CHECK Sanity Check
** SO_SEMI Stochastic Optimals: Semi-norm
** TLM_CHECK Tangent Linear Model Check
** VERIFICATION NL Observation Verification Driver
*/
/*
**-----------------------------------------------------------------------------
** Nonlinear basic state settings.
**-----------------------------------------------------------------------------
*/
#ifdef VERIFICATION
# define FULL_GRID
#endif
#define ANA_BSFLUX
#define ANA_BTFLUX
#define UV_ADV
#define DJ_GRADPS
#define UV_COR
#define UV_QDRAG
#define UV_VIS2
#define MIX_S_UV
#define MIX_GEO_TS
#define SPLINES_VDIFF
#define SPLINES_VVISC
#define TS_DIF2
#define SOLVE3D
#define SALINITY
#define NONLIN_EOS
#define CURVGRID
#define PROFILE
#define SPHERICAL
#define MASKING
#ifdef NLM_DRIVER
# define AVERAGES /* define if writing out time-averaged data */
#endif
/*
** Vertical Mixing parameterization
*/
#define GLS_MIXING
#ifdef GLS_MIXING
# define N2S2_HORAVG
# define KANTHA_CLAYSON
# define RI_SPLINES
#endif
/*
** Surface atmospheric fluxes. Note, that we must define DIURNAL_SRFLUX
** when using daily averaged fields.
*/
#define BULK_FLUXES /* turn ON or OFF bulk fluxes computation */
#define DIURNAL_SRFLUX /* impose shortwave radiation local diurnal cycle */
#define SOLAR_SOURCE /* define solar radiation source term */
#define LONGWAVE_OUT /* Compute net longwave radiation internally */
#define EMINUSP /* turn ON internal calculation of E-P */
/*
**-----------------------------------------------------------------------------
** Variational Data Assimilation.
**-----------------------------------------------------------------------------
*/
/*
** Options to compute error covariance normalization coefficients.
*/
#ifdef NORMALIZATION
# define ADJUST_BOUNDARY
# define ADJUST_WSTRESS
# define ADJUST_STFLUX
# define CORRELATION
# define VCONVOLUTION
# define IMPLICIT_VCONV
# define FULL_GRID
# define FORWARD_WRITE
# define FORWARD_READ
# define FORWARD_MIXING
# define OUT_DOUBLE
#endif
/*
** Options for adjoint-based algorithms sanity checks.
*/
#ifdef SANITY_CHECK
# define FULL_GRID
# define FORWARD_READ
# define FORWARD_WRITE
# define FORWARD_MIXING
# define OUT_DOUBLE
# define ANA_PERTURB
# define ANA_INITIAL
#endif
/*
** Common options to all 4DVAR algorithms.
*/
#if defined ARRAY_MODES || \
defined CLIPPING || \
defined I4DVAR || \
defined I4DVAR_ANA_SENSITIVITY || \
defined RBL4DVAR || \
defined RBL4DVAR_ANA_SENSITIVITY || \
defined R4DVAR || \
defined R4DVAR_ANA_SENSITIVITY
# define ADJUST_BOUNDARY
# define ADJUST_WSTRESS
# define ADJUST_STFLUX
# define PRIOR_BULK_FLUXES
# define FORWARD_FLUXES
# define VCONVOLUTION
# define IMPLICIT_VCONV
# define BALANCE_OPERATOR
# ifdef BALANCE_OPERATOR
# define ZETA_ELLIPTIC
# endif
# define FORWARD_WRITE
# define FORWARD_READ
# define FORWARD_MIXING
# define OUT_DOUBLE
#endif
/*
** Special options for each 4DVAR algorithm.
*/
#if defined ARRAY_MODES || \
defined R4DVAR || \
defined R4DVAR_ANA_SENSITIVITY
# define RPM_RELAXATION
#endif
Code: Select all
ROMS/TOMS Framework: April 9, 2023
===================
Copyright (c) 2002-2023 The ROMS/TOMS Group
Licensed under a MIT/X style license
See License_ROMS.txt
svn: $HeadURL: https://www.myroms.org/svn/src/trunk/ROMS/Version $
svn: $LastChangedBy: arango $
svn: $LastChangedRevision: 1165 $
svn: $LastChangedDate: 2023-04-09 22:59:07 -0300 (dom, 09 abr 2023) $
). After updating the source code to the latest version (ticket 1166) the model compiled successfully.