arrays-Stationary.inc


c*    Arrays dynamically allocated in this routine:
c*
c*    real w    (ia(_JT_nrows_))
c*    real xold (ia(_JT_nrows_))