FieldUnaryFunctions.F90 Source File

#include "MAPL_Generic.h"

module MAPL_FieldUnaryFunctions
   use ESMF
   use MAPL_ExceptionHandling
   use MAPL_FieldPointerUtilities
   implicit none
   private

   public :: fieldAbs
   public :: fieldExp
   public :: fieldLog10
   public :: fieldLog
   public :: fieldSqrt
   public :: fieldSinh
   public :: fieldCosh
   public :: fieldTanh
   public :: fieldSin
   public :: fieldCos
   public :: fieldTan
   public :: fieldAsin
   public :: fieldAcos
   public :: fieldAtan

contains

#define _FUNC Abs
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Exp
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Log10
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Log
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Sqrt
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Sinh
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Cosh
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Tanh
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Sin
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Cos
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Tan
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Asin
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Acos
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

#define _FUNC Atan
#include "FieldUnaryFunctionTemplate.H"
#undef _FUNC

end module MAPL_FieldUnaryFunctions