SUBROUTINE DNLASO(OP, IOVECT, N, NVAL, NFIG, NPERM,
			    *   NMVAL, VAL, NMVEC, VEC, NBLOCK, MAXOP, MAXJ, WORK,
			    *   IND, IERR)
C
      INTEGER N, NVAL, NFIG, NPERM, NMVAL, NMVEC, NBLOCK,

.