UFO
ObsSeaIceLinear.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_UTILS_OBSSEAICELINEAR_INTERFACE_H_
9 #define UFO_MARINE_UTILS_OBSSEAICELINEAR_INTERFACE_H_
10 
11 #include "ioda/ObsSpace.h"
12 
13 #include "ufo/Fortran.h"
14 
15 namespace ufo {
16 
17 /// Interface to Fortran UFO marine/seaicefraction routines
18 
19 extern "C" {
20 
21 // -----------------------------------------------------------------------------
22 
23  void ufo_seaicelinear_setup_f90(F90hop &, const eckit::Configuration &);
24  void ufo_seaicelinear_delete_f90(F90hop &);
25  void ufo_seaicelinear_settraj_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &);
26  void ufo_seaicelinear_alloc_ad_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &,
27  const int &, const double &);
28 // -----------------------------------------------------------------------------
29 
30 } // extern C
31 
32 } // namespace ufo
33 #endif // UFO_MARINE_UTILS_OBSSEAICELINEAR_INTERFACE_H_
ufo::F90goms
int F90goms
Definition: Fortran.h:16
ufo::ufo_seaicelinear_settraj_f90
void ufo_seaicelinear_settraj_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &)
Fortran.h
ufo
Definition: RunCRTM.h:27
ufo::ufo_seaicelinear_setup_f90
void ufo_seaicelinear_setup_f90(F90hop &, const eckit::Configuration &)
Interface to Fortran UFO marine/seaicefraction routines.
ufo::F90hop
int F90hop
Definition: Fortran.h:18
ufo::ufo_seaicelinear_alloc_ad_f90
void ufo_seaicelinear_alloc_ad_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &, const int &, const double &)
ufo::ufo_seaicelinear_delete_f90
void ufo_seaicelinear_delete_f90(F90hop &)