C
      PARAMETER (MTRM=20,MTERM=5)
      COMMON/CTERM/ NTERM(MLINE),KTERM(MTERM,MLINE),DETERM(MTRM),
     * WTERM(MTRM),FTERM(MTRM),GATERM(MTRM),GWTERM(MTRM),GQTERM(MTRM),
     * ADTERM(MDEP,MTRM)