! $Header$

       INTEGER kdlon, kflev
      PARAMETER (kdlon=10,kflev=klev)