Public Member Functions | |
| subroutine | get_meanqd (ngh, lam, xg, wg, ak, ma, q, qdak, qdma, ga, gadak, gadma, ff) |
| For a parameter vector, ak and a map-space domain-parameter vector, ma, return the lambda-parameterized quality diagnostic, Q, and the geographic domain-parameter vector ga. | |
| subroutine | get_meanqs (n, ngh, lam, xg, wg, aks, mas, qs, ff) |
| Like getmeanqd, except for n different values, aks, of ak and n different values, mas of ma, and without any of the derivatives. | |
| subroutine pesg::get_meanq::get_meanqd | ( | integer(spi), intent(in) | ngh, |
| real(dp), intent(in) | lam, | ||
| real(dp), dimension(ngh), intent(in) | xg, | ||
| real(dp), dimension(ngh), intent(in) | wg, | ||
| real(dp), dimension(2), intent(in) | ak, | ||
| real(dp), dimension(2), intent(in) | ma, | ||
| real(dp), intent(out) | q, | ||
| real(dp), dimension(2), intent(out) | qdak, | ||
| real(dp), dimension(2), intent(out) | qdma, | ||
| real(dp), dimension(2), intent(out) | ga, | ||
| real(dp), dimension(2,2), intent(out) | gadak, | ||
| real(dp), dimension(2,2), intent(out) | gadma, | ||
| logical, intent(out) | ff ) |
For a parameter vector, ak and a map-space domain-parameter vector, ma, return the lambda-parameterized quality diagnostic, Q, and the geographic domain-parameter vector ga.
Lambda is given by lam <1. Also, return the derivatives, qdak and qdma, of Q wrt ak and ma, and the derivatives gadak and gadma, of ga wrt ak and ma.
The domain averages of Q are accurately computed by bi-Gauss-Legendre quadrature over the positive quadrant of the domain (exploiting the symmetry) of the four constituent terms, v1, v2, v3, v4, from which the mean Q is computed using a quadratic formula of these constituents. The number of Gauss points in eaxh half-interval is ngh, and the nodes themselves are, in proportion to the half-interval, at xg. the normalized gauss weights are wg.
If a failure occurs, colmputations cease immediately and a failure flag, FF, is raised on return.
| [in] | ngh | |
| [in] | lam | Lambda |
| [in] | xg | |
| [in] | wg | |
| [in] | ak | parameter vector |
| [in] | ma | map-space domain-parameter vector |
| [out] | q | lambda-parameterized quality diagnostic |
| [out] | qdak | derivatives value |
| [out] | qdma | derivatives value |
| [out] | ga | geographic domain-parameter vector |
| [out] | gadak | |
| [out] | gadma | |
| [out] | ff | error flag |
| subroutine pesg::get_meanq::get_meanqs | ( | integer(spi), intent(in) | n, |
| integer(spi), intent(in) | ngh, | ||
| real(dp), intent(in) | lam, | ||
| real(dp), dimension(ngh), intent(in) | xg, | ||
| real(dp), dimension(ngh), intent(in) | wg, | ||
| real(dp), dimension(2,n), intent(in) | aks, | ||
| real(dp), dimension(2,n), intent(in) | mas, | ||
| real(dp), dimension(n), intent(out) | qs, | ||
| logical, intent(out) | ff ) |
1.11.0