Anonymous user
Numerical integration/Gauss-Legendre Quadrature: Difference between revisions
Numerical integration/Gauss-Legendre Quadrature (view source)
Revision as of 14:30, 10 July 2013
, 10 years ago→{{header|Fortran}}
(Fortran added) |
|||
Line 310:
implicit none
integer, parameter :: p = 16 ! quadruple precision
integer :: n
real(kind=p), allocatable :: r(:,:)
real(kind=p) :: z, a, b, exact, z1, z2
|