c-----------------------------------------------------------------------
c INCLUDE 'logic.h'

      COMMON/logic/ purmats,physic,forward,leapf,apphys,grireg,
     *  statcl,conser,apdiss,apdelq,saison,ecripar,fxyhypb,ysinus,hybrid

      LOGICAL purmats,physic,forward,leapf,apphys,grireg,statcl,conser,
     * apdiss,apdelq,saison,ecripar,fxyhypb,ysinus,hybrid

c-----------------------------------------------------------------------