UFO
ObsMarineVertInterp.interface.h
Go to the documentation of this file.
1 /*
2  * (C) Copyright 2017-2019 UCAR
3  *
4  * This software is licensed under the terms of the Apache Licence Version 2.0
5  * which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
6  */
7 
8 #ifndef UFO_MARINE_MARINEVERTINTERP_OBSMARINEVERTINTERP_INTERFACE_H_
9 #define UFO_MARINE_MARINEVERTINTERP_OBSMARINEVERTINTERP_INTERFACE_H_
10 
11 #include "ioda/ObsSpace.h"
12 #include "oops/base/Variables.h"
13 #include "ufo/Fortran.h"
14 
15 namespace ufo {
16 
17 /// Interface to Fortran UFO marine/marinevertinterp routines
18 
19 extern "C" {
20 
21 // -----------------------------------------------------------------------------
22 
23  void ufo_marinevertinterp_setup_f90(F90hop &, const eckit::Configuration &,
24  const oops::Variables &, oops::Variables &);
25  void ufo_marinevertinterp_delete_f90(F90hop &);
26  void ufo_marinevertinterp_simobs_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &,
27  const int &, double &);
28 
29 // -----------------------------------------------------------------------------
30 
31 } // extern C
32 
33 } // namespace ufo
34 #endif // UFO_MARINE_MARINEVERTINTERP_OBSMARINEVERTINTERP_INTERFACE_H_
ufo::F90goms
int F90goms
Definition: Fortran.h:16
Fortran.h
ufo
Definition: RunCRTM.h:27
ufo::F90hop
int F90hop
Definition: Fortran.h:18
ufo::ufo_marinevertinterp_delete_f90
void ufo_marinevertinterp_delete_f90(F90hop &)
ufo::ufo_marinevertinterp_simobs_f90
void ufo_marinevertinterp_simobs_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &, const int &, double &)
ufo::ufo_marinevertinterp_setup_f90
void ufo_marinevertinterp_setup_f90(F90hop &, const eckit::Configuration &, const oops::Variables &, oops::Variables &)
Interface to Fortran UFO marine/marinevertinterp routines.