Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=dp), | intent(in) | :: | b | |||
real(kind=dp), | intent(out), | optional | :: | x0 | ||
real(kind=dp), | intent(out), | optional | :: | x1 |
pure subroutine fullStop_22(b, x0, x1)
real(dp), intent(in) :: b
real(dp), intent(out), optional :: x0, x1
if (present(x0)) x0 = OverR2
if (present(x1)) x1 = funA_3_1_overR2(b)
end subroutine fullStop_22