Sulkta-OSS/agora
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

make fourmula happy

Browse source
This commit is contained in:
Hongrui Fang 2022-11-12 00:30:35 +08:00
parent b0a4c67822
commit 1680d0d21a
No known key found for this signature in database
GPG key ID: F10AB2CCE24113DD
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
agora-specs/Property/Governor.hs
View file

@ -1,3 +1,7 @@
{-# OPTIONS_GHC -Wno-unrecognised-pragmas #-}
{-# HLINT ignore "Redundant bracket" #-}
{- |
Module : Property.Governor
Maintainer : seungheon.ooh@gmail.com
@ -105,7 +109,7 @@ instance Arbitrary GovernorDatumCases where
-}
governorDatumValidProperty :: Property
governorDatumValidProperty =
haskEquiv @'OnPEq @'ByComplete
haskEquiv @( 'OnPEq) @( 'ByComplete)
isValidModelImpl
(TestableTerm pisGovernorDatumValid)
(genDatum :* Nil)