grid_tools  1.8.0
pfun.f90 File Reference

Routine evaluating useful functions not always available in Fortran. More...

Go to the source code of this file.

Data Types

interface  pfun::ahav
 
interface  pfun::ahavh
 
interface  pfun::atanh
 
interface  pfun::gd
 
interface  pfun::gdi
 
interface  pfun::hav
 
interface  pfun::havh
 
interface  pfun::sech
 
interface  pfun::sechs
 
interface  pfun::sinhox
 
interface  pfun::sinhoxm
 
interface  pfun::sinox
 
interface  pfun::sinoxm
 

Modules

module  pfun
 This module is for evaluating several useful real-valued functions that are not always available in Fortran compilers.
 

Functions/Subroutines

real(dp) function pfun::ahav_d (a)
 Arc-haversine function for double precision real. More...
 
real(sp) function pfun::ahav_s (a)
 Arc-haversine function for single precision real. More...
 
real(dp) function pfun::ahavh_d (a)
 Hyperbolic arc-haversine for double precision real. More...
 
real(sp) function pfun::ahavh_s (a)
 Hyperbolic arc-haversine for single precision real. More...
 
real(dp) function pfun::atanh_d (t)
 Hyperbolic arc-tangent for double precision real. More...
 
real(sp) function pfun::atanh_s (t)
 Hyperbolic arc-tangent for single precision real. More...
 
real(dp) function pfun::gd_d (x)
 Gudermannian function (related to Mercator map projections) More...
 
real(sp) function pfun::gd_s (x)
 Gudermannian function (related to Mercator map projections) More...
 
real(dp) function pfun::gdi_d (y)
 Inverse Gudermannian function for double precision real. More...
 
real(sp) function pfun::gdi_s (y)
 Inverse Gudermannian function for single precision real. More...
 
real(dp) function pfun::hav_d (t)
 Haversine function for double precision real (for geometry on the sphere). More...
 
real(sp) function pfun::hav_s (t)
 Haversine function for single precision real (for geometry on the sphere). More...
 
real(dp) function pfun::havh_d (t)
 Hyperbolic-haversine for double precision real (for pseudosphere geometry). More...
 
real(sp) function pfun::havh_s (t)
 Hyperbolic-haversine for single precision real (for pseudosphere geometry). More...
 
real(dp) function pfun::sech_d (x)
 Hyperbolic secant for double precision real. More...
 
real(sp) function pfun::sech_s (x)
 Hyperbolic secant for single precision real. More...
 
real(dp) function pfun::sechs_d (x)
 Hyperbolic secant-squared function (logistic distribution). More...
 
real(sp) function pfun::sechs_s (x)
 Hyperbolic secant-squared function (logistic distribution). More...
 
real(dp) function pfun::sinhox_d (x)
 Evaluate the symmetric real function sinh(x)/x. More...
 
real(dp) function pfun::sinhoxm_d (x)
 Evaluate the symmetric real function sinh(x)/x-1. More...
 
real(dp) function pfun::sinox_d (x)
 Evaluate the symmetric real function sin(x)/x. More...
 
real(dp) function pfun::sinoxm_d (x)
 Evaluate the symmetric real function sin(x)/x-1, still accurate near x=0. More...
 

Detailed Description

Routine evaluating useful functions not always available in Fortran.

Author
R. J. Purser

Definition in file pfun.f90.