J
Function
Purpose Statement
Solves a real symmetric definite linear system using the Jacobi preconditioned conjugate gradient method with reverse communication.