arrays-BCGS.inc

c*    Arrays dynamically allocated in this routine:
c*
c*    real d    (ia(_JT_nrows_))
c*    real h    (ia(_JT_nrows_))
c*    real q    (ia(_JT_nrows_))
c*    real r    (ia(_JT_nrows_))
c*    real u    (ia(_JT_nrows_))
c*    real g    (ia(_JT_nrows_))
c*    real v    (ia(_JT_nrows_))
c*    real w    (ia(_JT_nrows_))
c*    real work (ia(_JT_nrows_))
c*    real xold (ia(_JT_nrows_))