ObsWindQG.cc

Go to the documentation of this file.

/*
 * (C) Copyright 2009-2016 ECMWF.
 * 
 * This software is licensed under the terms of the Apache Licence Version 2.0
 * which can be obtained at http://www.apache.org/licenses/LICENSE-2.0. 
 * In applying this licence, ECMWF does not waive the privileges and immunities 
 * granted to it by virtue of its status as an intergovernmental organisation nor
 * does it submit to any jurisdiction.
 */
 
#include "model/ObsWindQG.h"
 
#include <vector>
 
#include "eckit/config/Configuration.h"
#include "model/GomQG.h"
#include "model/ObsBias.h"
#include "model/ObsSpaceQG.h"
#include "model/ObsVecQG.h"
#include "model/QgFortran.h"
#include "oops/base/Variables.h"
#include "oops/util/Logger.h"
 
// -----------------------------------------------------------------------------
namespace qg {
// -----------------------------------------------------------------------------
static ObsOpMaker<ObsWindQG>   makerWind_("Wind");
// -----------------------------------------------------------------------------
 
ObsWindQG::ObsWindQG(const ObsSpaceQG & odb, const eckit::Configuration & config)
  : obsdb_(odb), varin_(std::vector<std::string>{"u", "v"})
{
  oops::Log::trace() << "ObsWindQG created." << std::endl;
}
 
// -----------------------------------------------------------------------------
 
void ObsWindQG::simulateObs(const GomQG & gom, ObsVecQG & ovec,
                            const ObsBias & bias) const {
  qg_wind_equiv_f90(gom.toFortran(), ovec.toFortran(), bias.wind());
}
 
// -----------------------------------------------------------------------------
 
std::unique_ptr<LocationsQG> ObsWindQG::locations() const {
  return obsdb_.locations();
}
 
// -----------------------------------------------------------------------------
 
void ObsWindQG::print(std::ostream & os) const {
  os << "QG wind components (u and v) observation operator";
}
 
// -----------------------------------------------------------------------------
 
}  // namespace qg