Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=dp), | intent(in) | :: | b |
pure function funA_m1_1_overR2(b) result(ret)
real(dp), intent(in) :: b
real(dp) :: ret
ret = OverR2 * funA(b, -1.0_dp, 1.0_dp)
end function funA_m1_1_overR2