SABER
tools_func.F90 File Reference

Go to the source code of this file.

Data Types

interface  tools_func::c_fletcher32
 
interface  tools_func::fletcher32
 
interface  tools_func::lonlatmod
 
interface  tools_func::gridhash
 
interface  tools_func::independent_levels
 
interface  tools_func::lonlathash
 
interface  tools_func::sphere_dist
 
interface  tools_func::lonlat2xyz
 
interface  tools_func::xyz2lonlat
 
interface  tools_func::vector_product
 
interface  tools_func::det
 
interface  tools_func::order_cc
 
interface  tools_func::add
 
interface  tools_func::divide
 
interface  tools_func::fit_diag
 
interface  tools_func::gc99
 
interface  tools_func::fit_func
 
interface  tools_func::fit_lct
 
interface  tools_func::lct_d2h
 
interface  tools_func::lct_h2r
 
interface  tools_func::lct_r2d
 
interface  tools_func::check_cond
 
interface  tools_func::matern
 
interface  tools_func::cholesky
 
interface  tools_func::syminv
 
interface  tools_func::histogram
 
interface  tools_func::cx_to_cxa
 
interface  tools_func::cx_to_proc
 
interface  tools_func::cx_to_cxu
 

Modules

module  tools_func
 Subroutines/functions list.
 

Functions/Subroutines

integer function tools_func::func_fletcher32 (var)
 Fletcher-32 checksum algorithm. More...
 
subroutine tools_func::func_lonlatmod (lon, lat)
 Set latitude between -pi/2 and pi/2 and longitude between -pi and pi. More...
 
subroutine tools_func::func_gridhash (ncx, nlx, lon_cx, lat_cx, mask_cx, grid_hash)
 Compute grid hash profile. More...
 
subroutine tools_func::func_independent_levels (mpl, nlx, grid_hash, nlxi, lx_to_lxi, lxi_to_lx, ifmt)
 Compute independent levels. More...
 
real(kind_real) function tools_func::func_lonlathash (lon, lat, il)
 Define a unique real from a lon/lat pair. More...
 
subroutine tools_func::func_sphere_dist (lon_i, lat_i, lon_f, lat_f, dist)
 Compute the great-circle distance between two points. More...
 
subroutine tools_func::func_lonlat2xyz (mpl, lon, lat, x, y, z)
 Convert longitude/latitude to cartesian coordinates. More...
 
subroutine tools_func::func_xyz2lonlat (mpl, x, y, z, lon, lat)
 Convert longitude/latitude to cartesian coordinates. More...
 
subroutine tools_func::func_vector_product (v1, v2, vp)
 Compute normalized vector product. More...
 
subroutine tools_func::func_det (v1, v2, v3, p, cflag)
 Compute determinant (vector triple product) More...
 
subroutine tools_func::func_order_cc (mpl, lon, lat, n, x, y, z, order, diff)
 Order points in counter-clockwise order with respect to a central point. More...
 
subroutine tools_func::func_add (mpl, val, cumul, num, wgt)
 Check if value missing and add if not missing. More...
 
subroutine tools_func::func_divide (mpl, val, num)
 Check if value missing and divide if not missing. More...
 
subroutine tools_func::func_fit_diag (mpl, nc3, nl0r, nl0, l0rl0_to_l0, disth, distv, coef, rh, rv, fit)
 Compute diagnostic fit function. More...
 
real(kind_real) function tools_func::func_gc99 (distnorm)
 Gaspari and Cohn (1999) function, with the support radius as a parameter. More...
 
real(kind_real) function tools_func::func_fit_func (mpl, distnorm)
 Fit_function. More...
 
subroutine tools_func::func_fit_lct (mpl, nc, nl0, dxsq, dysq, dxdy, dzsq, dmask, nscales, D, coef, fit)
 LCT fit. More...
 
subroutine tools_func::func_lct_d2h (mpl, D11, D22, D33, D12, H11, H22, H33, H12)
 From D (Daley tensor) to H (local correlation tensor) More...
 
subroutine tools_func::func_lct_h2r (mpl, H11, H22, H33, H12, rh, rv)
 From H (local correlation tensor) to support radii. More...
 
subroutine tools_func::func_lct_r2d (r, D)
 From support radius to Daley tensor diagonal element. More...
 
subroutine tools_func::func_check_cond (d1, d2, nod, valid)
 Check tensor conditioning. More...
 
real(kind_real) function tools_func::func_matern (mpl, M, x)
 Compute the normalized diffusion function from eq. (55) of Mirouze and Weaver (2013), for the 3d case (d = 3) More...
 
subroutine tools_func::func_cholesky (mpl, n, a, u)
 Compute cholesky decomposition. More...
 
subroutine tools_func::func_syminv (mpl, n, a, c)
 Compute inverse of a symmetric matrix. More...
 
subroutine tools_func::func_histogram (mpl, nlist, list, nbins, histmin, histmax, bins, hist)
 Compute bins and histogram from a list of values. More...
 
integer function tools_func::func_cx_to_cxa (nproc, proc_to_cx_offset, icx)
 Conversion from global to halo A on subset Scx. More...
 
integer function tools_func::func_cx_to_proc (nproc, proc_to_cx_offset, icx)
 Conversion from global to processor on subset Scx. More...
 
integer function tools_func::func_cx_to_cxu (nproc, proc_to_cx_offset, proc_to_ncxa, myuniverse, icx)
 Conversion from global to universe on subset Scx. More...
 

Variables

real(kind_real), parameter, public tools_func::gc2gau = 0.28_kind_real
 GC99 support radius to Gaussian Daley length-scale (empirical) More...
 
real(kind_real), parameter, public tools_func::gau2gc = 3.57_kind_real
 Gaussian Daley length-scale to GC99 support radius (empirical) More...
 
real(kind_real), parameter, public tools_func::dmin = 1.0e-12_kind_real
 Minimum tensor diagonal value. More...
 
real(kind_real), parameter tools_func::condmax = thousand
 Maximum tensor conditioning number. More...
 
integer, parameter, public tools_func::m = 0
 Number of implicit iteration for the Matern function (0: Gaussian) More...