MODULE NState_Module
   IMPLICIT NONE
   SAVE
   INTEGER, PARAMETER:: NState=540 !220 for H3 300 for fh2DVR 540 for fh2ABM
END MODULE NState_Module