arrays-GMRES.inc


c*    Arrays dynamically allocated in this routine:
c*
c*    real w  (ia(_JT_nrows_))
c*    real c  (iparm(_JT_nold_)+1)
c*    real s  (iparm(_JT_nold_)+1)
c*    real r  (iparm(_JT_nold_)+1)
c*    real rt (iparm(_JT_nold_)+1)
c*    real h  (iparm(_JT_nold_)+1,iparm(_JT_nold_)+1)
c*    real v  (ia(_JT_nrows_),iparm(_JT_nold_)+1)
c*    real xold (ia(_JT_nrows_))
c*    real xt (ia(_JT_nrows_))