moda_h4wlc.F

    MODULE moda_h4wlc

#ifndef MXH4WLC_H
#define MXH4WLC_H
      USE modv_mxh4wlc
#endif

      INTEGER :: nh4wlc

      INTEGER :: luh4wlc(mxh4wlc)
      CHARACTER*14 :: sth4wlc(mxh4wlc)
      CHARACTER*120 :: chh4wlc(mxh4wlc)

    END MODULE