SPEC 3.20
Stepped Pressure Equilibrium Code
|
Calculates volume integrals of Chebyshev-polynomials and covariant field for Hessian computation. More...
Data Types | |
type | intghs_module::intghs_workspace |
This calculates the integral of something related to matrix-vector-multiplication. More... | |
Functions/Subroutines | |
subroutine | intghs (lquad, mn, lvol, lrad, idx) |
Calculates volume integrals of Chebyshev polynomials and covariant field products. More... | |
subroutine | intghs_workspace_init (lvol) |
init workspace More... | |
subroutine | intghs_workspace_destroy () |
free workspace More... | |
Variables | |
type(intghs_workspace) | intghs_module::wk |
This is an instance of the intghs_workspace type. | |
Calculates volume integrals of Chebyshev-polynomials and covariant field for Hessian computation.
subroutine intghs | ( | integer, intent(in) | lquad, |
integer, intent(in) | mn, | ||
integer, intent(in) | lvol, | ||
integer, intent(in) | lrad, | ||
integer, intent(in) | idx | ||
) |
Calculates volume integrals of Chebyshev polynomials and covariant field products.
lquad | |
mn | |
lvol | |
lrad | |
idx |
References allglobal::ate, allglobal::ato, allglobal::aze, allglobal::azo, compute_guvijsave(), allglobal::cpus, allglobal::dbdx, allglobal::dtc, allglobal::dts, allglobal::dzc, allglobal::dzs, allglobal::gaussianabscissae, allglobal::gaussianweight, get_cheby(), get_zernike(), allglobal::guvij, allglobal::guvijsave, constants::half, allglobal::im, allglobal::in, intghs(), allglobal::lcoordinatesingularity, allglobal::lsavedguvij, allglobal::mne, allglobal::mpi_comm_spec, inputlist::mpol, allglobal::myid, allglobal::ncpu, allglobal::notstellsym, allglobal::nt, allglobal::ntz, allglobal::nz, constants::one, fileunits::ounit, constants::pi, constants::pi2, allglobal::sg, numerical::small, numerical::sqrtmachprec, allglobal::tsc, allglobal::tss, allglobal::ttc, allglobal::tts, constants::two, allglobal::tzc, allglobal::tzs, numerical::vsmall, inputlist::wmacros, allglobal::yesstellsym, and constants::zero.
Referenced by get_perturbed_solution(), intghs(), intghs_workspace_destroy(), intghs_workspace_init(), matvec(), and mp00ac().
subroutine intghs_workspace_init | ( | integer, intent(in) | lvol | ) |
init workspace
lvol |
References allglobal::cpus, intghs(), allglobal::iquad, inputlist::lrad, allglobal::mn, allglobal::mpi_comm_spec, inputlist::mpol, allglobal::myid, allglobal::ncpu, allglobal::ntz, fileunits::ounit, inputlist::wmacros, and constants::zero.
Referenced by dfp100(), dfp200(), and evaluate_dmupfdx().
subroutine intghs_workspace_destroy |
free workspace
lvol |
References allglobal::cpus, intghs(), allglobal::mpi_comm_spec, allglobal::myid, allglobal::ncpu, fileunits::ounit, and inputlist::wmacros.
Referenced by dfp100(), dfp200(), and evaluate_dmupfdx().