[ECC] add Bounded instance to CurveName
This commit is contained in:
parent
605e5cf6a6
commit
fd24980530
@ -121,7 +121,7 @@ data CurveName =
|
|||||||
| SEC_t409r1
|
| SEC_t409r1
|
||||||
| SEC_t571k1
|
| SEC_t571k1
|
||||||
| SEC_t571r1
|
| SEC_t571r1
|
||||||
deriving (Show,Read,Eq,Ord,Enum,Data,Typeable)
|
deriving (Show,Read,Eq,Ord,Enum,Bounded,Data,Typeable)
|
||||||
|
|
||||||
{-
|
{-
|
||||||
curvesOIDs :: [ (CurveName, [Integer]) ]
|
curvesOIDs :: [ (CurveName, [Integer]) ]
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user