vmercier.f

      MODULE vmercier
      USE vparams, ONLY: nsd, rprec, dp
      IMPLICIT NONE
C-----------------------------------------------
C   L o c a l   V a r i a b l e s
C-----------------------------------------------
      REAL(rprec), DIMENSION(nsd) ::
     1   Dshear, Dwell, Dcurr, Dmerc, Dgeod
      END MODULE vmercier