MODULE vwaste_Module
!--------------------------------------------------------------------
! vwaste_Module
!
!  vscr
!--------------------------------------------------------------------
USE numeric_kinds_Module
   SAVE
   REAL (KINd=dp) vscr(128)
   NAMELIST / vwaste   / vscr
END MODULE vwaste_Module