UFO
ObsCoolSkin.interface.h
Go to the documentation of this file.
1 /*
2  * (C) Copyright 2017-2018 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_COOLSKIN_OBSCOOLSKIN_INTERFACE_H_
9 #define UFO_MARINE_COOLSKIN_OBSCOOLSKIN_INTERFACE_H_
10 
11 #include "ioda/ObsSpace.h"
12 
13 #include "ufo/Fortran.h"
14 
15 namespace ufo {
16 
17 /// Interface to Fortran UFO CoolSkin routines
18 
19 extern "C" {
20 
21 // -----------------------------------------------------------------------------
22 
23  void ufo_CoolSkin_setup_f90(F90hop &, const eckit::Configuration &);
24  void ufo_CoolSkin_delete_f90(F90hop &);
25  void ufo_CoolSkin_simobs_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &,
26  const int &, double &);
27 
28 // -----------------------------------------------------------------------------
29 
30 } // extern C
31 
32 } // namespace ufo
33 #endif // UFO_MARINE_COOLSKIN_OBSCOOLSKIN_INTERFACE_H_
ufo
Definition: RunCRTM.h:27
ufo::F90goms
int F90goms
Definition: Fortran.h:16
ufo::ufo_CoolSkin_setup_f90
void ufo_CoolSkin_setup_f90(F90hop &, const eckit::Configuration &)
Interface to Fortran UFO CoolSkin routines.
ufo::ufo_CoolSkin_delete_f90
void ufo_CoolSkin_delete_f90(F90hop &)
ufo::F90hop
int F90hop
Definition: Fortran.h:18
ufo::ufo_CoolSkin_simobs_f90
void ufo_CoolSkin_simobs_f90(const F90hop &, const F90goms &, const ioda::ObsSpace &, const int &, double &)