Data Types | |
interface | is_nan |
Public Member Functions | |
logical function | is_nan_dp (x) |
Home made isnan for real(kind=dp) More... | |
logical function | is_nan_real (x) |
Home made isnan for real. More... | |
subroutine | test_util () |
subroutine | printerror (status) |
character(len=len(strin)) function | to_upper (strIn) |
character(len=len(strin)) function | to_lower (strIn) |
subroutine | gridpos (x, x0, ji, jf) |
subroutine | gridposreal (x, x0, ji, jf) |
subroutine | polint (xa, ya, x, y, dy) |
subroutine | polintreal (xa, ya, x, y, dy) |
1D interpolation with real(4). More... | |
subroutine | polintdouble (xa, ya, x, y, dy) |
1D interpolation with real(8). More... | |
subroutine | interpol2 (x, y, f, nptx, npty, x0, y0, f0, df0, fid) |
subroutine | interpol2real (x, y, f, nptx, npty, x0, y0, f0, df0) |
subroutine | row_beg2end (i0, input_mat, output_mat) |
Reshape an input matrix by putting to the end the i0-first rows. Return another matrix. More... | |
subroutine | vec_beg2end (i0, input_vec, output_vec) |
Reshape an input vector by putting to the end the i0-first elements. Return another vector. More... | |
subroutine | nearest_index (x, x0, i0) |
Find the index of the nearest element of a vector. More... | |
subroutine corfield_util::gridpos | ( | real(kind=dp), dimension(:), intent(in) | x, |
real(kind=dp), intent(in) | x0, | ||
integer, intent(out) | ji, | ||
integer, intent(out) | jf | ||
) |
subroutine corfield_util::gridposreal | ( | real, dimension(:), intent(in) | x, |
real, intent(in) | x0, | ||
integer, intent(out) | ji, | ||
integer, intent(out) | jf | ||
) |
subroutine corfield_util::interpol2 | ( | real(kind=dp), dimension(:), intent(in) | x, |
real(kind=dp), dimension(:), intent(in) | y, | ||
real(kind=dp), dimension(:,:), intent(in) | f, | ||
integer, intent(in) | nptx, | ||
integer, intent(in) | npty, | ||
real(kind=dp), intent(in) | x0, | ||
real(kind=dp), intent(in) | y0, | ||
real(kind=dp), intent(out) | f0, | ||
real(kind=dp), intent(out) | df0, | ||
integer, optional | fid | ||
) |
subroutine corfield_util::interpol2real | ( | real, dimension(:), intent(in) | x, |
real, dimension(:), intent(in) | y, | ||
real, dimension(:,:), intent(in) | f, | ||
integer, intent(in) | nptx, | ||
integer, intent(in) | npty, | ||
real, intent(in) | x0, | ||
real, intent(in) | y0, | ||
real, intent(out) | f0, | ||
real, intent(out) | df0 | ||
) |
logical function corfield_util::is_nan_dp | ( | real(kind=dp), intent(in) | x | ) |
Home made isnan for real(kind=dp)
logical function corfield_util::is_nan_real | ( | real, intent(in) | x | ) |
Home made isnan for real.
subroutine corfield_util::nearest_index | ( | real, dimension(:), intent(in) | x, |
real, intent(in) | x0, | ||
integer, intent(out) | i0 | ||
) |
Find the index of the nearest element of a vector.
subroutine corfield_util::polint | ( | real(kind=dp), dimension(:), intent(in) | xa, |
real(kind=dp), dimension(:), intent(in) | ya, | ||
real(kind=dp), intent(in) | x, | ||
real(kind=dp), intent(out) | y, | ||
real(kind=dp), intent(out) | dy | ||
) |
subroutine corfield_util::polintdouble | ( | real(kind=dp), dimension(:), intent(in) | xa, |
real(kind=dp), dimension(:), intent(in) | ya, | ||
real(kind=dp), intent(in) | x, | ||
real(kind=dp), intent(out) | y, | ||
real(kind=dp), intent(out) | dy | ||
) |
1D interpolation with real(8).
subroutine corfield_util::polintreal | ( | real, dimension(:), intent(in) | xa, |
real, dimension(:), intent(in) | ya, | ||
real, intent(in) | x, | ||
real, intent(out) | y, | ||
real, intent(out) | dy | ||
) |
1D interpolation with real(4).
subroutine corfield_util::printerror | ( | integer | status | ) |
subroutine corfield_util::row_beg2end | ( | integer, intent(in) | i0, |
real, dimension(:,:), intent(in) | input_mat, | ||
real, dimension(:,:) | output_mat | ||
) |
Reshape an input matrix by putting to the end the i0-first rows. Return another matrix.
subroutine corfield_util::test_util | ( | ) |
character(len=len(strin)) function corfield_util::to_lower | ( | character(len=*), intent(in) | strIn | ) |
character(len=len(strin)) function corfield_util::to_upper | ( | character(len=*), intent(in) | strIn | ) |
subroutine corfield_util::vec_beg2end | ( | integer, intent(in) | i0, |
real, dimension(:), intent(in) | input_vec, | ||
real, dimension(:) | output_vec | ||
) |
Reshape an input vector by putting to the end the i0-first elements. Return another vector.