{-# LANGUAGE BangPatterns #-}
{-# LANGUAGE EmptyCase #-}
{-# LANGUAGE EmptyDataDecls #-}
{-# LANGUAGE ExistentialQuantification #-}
{-# LANGUAGE NoMonomorphismRestriction #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}

{-# OPTIONS_GHC -Wno-overlapping-patterns #-}

module MAlonzo.Code.Algebra.Definitions.RawMagma where

import MAlonzo.RTE (coe, erased, AgdaAny, addInt, subInt, mulInt,
                    quotInt, remInt, geqInt, ltInt, eqInt, add64, sub64, mul64, quot64,
                    rem64, lt64, eq64, word64FromNat, word64ToNat)
import qualified MAlonzo.RTE
import qualified Data.Text
import qualified MAlonzo.Code.Agda.Primitive
import qualified MAlonzo.Code.Algebra.Bundles.Raw

-- Algebra.Definitions.RawMagma._∣ˡ_
d__'8739''737'__26 :: p -> p -> p -> p -> p -> ()
d__'8739''737'__26 p
a0 p
a1 p
a2 p
a3 p
a4 = ()
data T__'8739''737'__26 = C__'44'__40 AgdaAny AgdaAny
-- Algebra.Definitions.RawMagma._∣ˡ_.quotient
d_quotient_36 :: T__'8739''737'__26 -> AgdaAny
d_quotient_36 :: T__'8739''737'__26 -> AgdaAny
d_quotient_36 T__'8739''737'__26
v0
  = case T__'8739''737'__26 -> T__'8739''737'__26
forall a b. a -> b
coe T__'8739''737'__26
v0 of
      C__'44'__40 AgdaAny
v1 AgdaAny
v2 -> AgdaAny -> AgdaAny
forall a b. a -> b
coe AgdaAny
v1
      T__'8739''737'__26
_ -> AgdaAny
forall a. a
MAlonzo.RTE.mazUnreachableError
-- Algebra.Definitions.RawMagma._∣ˡ_.equality
d_equality_38 :: T__'8739''737'__26 -> AgdaAny
d_equality_38 :: T__'8739''737'__26 -> AgdaAny
d_equality_38 T__'8739''737'__26
v0
  = case T__'8739''737'__26 -> T__'8739''737'__26
forall a b. a -> b
coe T__'8739''737'__26
v0 of
      C__'44'__40 AgdaAny
v1 AgdaAny
v2 -> AgdaAny -> AgdaAny
forall a b. a -> b
coe AgdaAny
v2
      T__'8739''737'__26
_ -> AgdaAny
forall a. a
MAlonzo.RTE.mazUnreachableError
-- Algebra.Definitions.RawMagma._∤ˡ_
d__'8740''737'__42 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Algebra.Bundles.Raw.T_RawMagma_36 ->
  AgdaAny -> AgdaAny -> ()
d__'8740''737'__42 :: () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
d__'8740''737'__42 = () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
forall a. a
erased
-- Algebra.Definitions.RawMagma._∣ʳ_
d__'8739''691'__52 :: p -> p -> p -> p -> p -> ()
d__'8739''691'__52 p
a0 p
a1 p
a2 p
a3 p
a4 = ()
data T__'8739''691'__52 = C__'44'__66 AgdaAny AgdaAny
-- Algebra.Definitions.RawMagma._∣ʳ_.quotient
d_quotient_62 :: T__'8739''691'__52 -> AgdaAny
d_quotient_62 :: T__'8739''691'__52 -> AgdaAny
d_quotient_62 T__'8739''691'__52
v0
  = case T__'8739''691'__52 -> T__'8739''691'__52
forall a b. a -> b
coe T__'8739''691'__52
v0 of
      C__'44'__66 AgdaAny
v1 AgdaAny
v2 -> AgdaAny -> AgdaAny
forall a b. a -> b
coe AgdaAny
v1
      T__'8739''691'__52
_ -> AgdaAny
forall a. a
MAlonzo.RTE.mazUnreachableError
-- Algebra.Definitions.RawMagma._∣ʳ_.equality
d_equality_64 :: T__'8739''691'__52 -> AgdaAny
d_equality_64 :: T__'8739''691'__52 -> AgdaAny
d_equality_64 T__'8739''691'__52
v0
  = case T__'8739''691'__52 -> T__'8739''691'__52
forall a b. a -> b
coe T__'8739''691'__52
v0 of
      C__'44'__66 AgdaAny
v1 AgdaAny
v2 -> AgdaAny -> AgdaAny
forall a b. a -> b
coe AgdaAny
v2
      T__'8739''691'__52
_ -> AgdaAny
forall a. a
MAlonzo.RTE.mazUnreachableError
-- Algebra.Definitions.RawMagma._∤ʳ_
d__'8740''691'__68 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Algebra.Bundles.Raw.T_RawMagma_36 ->
  AgdaAny -> AgdaAny -> ()
d__'8740''691'__68 :: () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
d__'8740''691'__68 = () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
forall a. a
erased
-- Algebra.Definitions.RawMagma._∣_
d__'8739'__74 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Algebra.Bundles.Raw.T_RawMagma_36 ->
  AgdaAny -> AgdaAny -> ()
d__'8739'__74 :: () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
d__'8739'__74 = () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
forall a. a
erased
-- Algebra.Definitions.RawMagma._∤_
d__'8740'__76 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Algebra.Bundles.Raw.T_RawMagma_36 ->
  AgdaAny -> AgdaAny -> ()
d__'8740'__76 :: () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
d__'8740'__76 = () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
forall a. a
erased
-- Algebra.Definitions.RawMagma._∣∣_
d__'8739''8739'__82 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Algebra.Bundles.Raw.T_RawMagma_36 ->
  AgdaAny -> AgdaAny -> ()
d__'8739''8739'__82 :: () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
d__'8739''8739'__82 = () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
forall a. a
erased
-- Algebra.Definitions.RawMagma._∤∤_
d__'8740''8740'__88 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  MAlonzo.Code.Algebra.Bundles.Raw.T_RawMagma_36 ->
  AgdaAny -> AgdaAny -> ()
d__'8740''8740'__88 :: () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
d__'8740''8740'__88 = () -> () -> T_RawMagma_36 -> AgdaAny -> AgdaAny -> ()
forall a. a
erased