{-# 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.Data.String.Properties 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.Builtin.Equality
import qualified MAlonzo.Code.Agda.Builtin.String
import qualified MAlonzo.Code.Agda.Primitive
import qualified MAlonzo.Code.Data.Char.Properties
import qualified MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict
import qualified MAlonzo.Code.Data.List.Relation.Binary.Pointwise
import qualified MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base
import qualified MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Properties
import qualified MAlonzo.Code.Function.Base
import qualified MAlonzo.Code.Relation.Binary.Bundles
import qualified MAlonzo.Code.Relation.Binary.Construct.On
import qualified MAlonzo.Code.Relation.Binary.PropositionalEquality.Properties
import qualified MAlonzo.Code.Relation.Binary.Structures
import qualified MAlonzo.Code.Relation.Nullary
import qualified MAlonzo.Code.Relation.Nullary.Decidable.Core

-- Data.String.Properties.≈⇒≡
d_'8776''8658''8801'_6 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48 ->
  MAlonzo.Code.Agda.Builtin.Equality.T__'8801'__12
d_'8776''8658''8801'_6 :: T_String_6 -> T_String_6 -> T_Pointwise_48 -> T__'8801'__12
d_'8776''8658''8801'_6 = T_String_6 -> T_String_6 -> T_Pointwise_48 -> T__'8801'__12
forall a. a
erased
-- Data.String.Properties.≈-reflexive
d_'8776''45'reflexive_8 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.Equality.T__'8801'__12 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48
d_'8776''45'reflexive_8 :: T_String_6 -> T_String_6 -> T__'8801'__12 -> T_Pointwise_48
d_'8776''45'reflexive_8 T_String_6
v0 ~T_String_6
v1 ~T__'8801'__12
v2 = T_String_6 -> T_Pointwise_48
du_'8776''45'reflexive_8 T_String_6
v0
du_'8776''45'reflexive_8 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48
du_'8776''45'reflexive_8 :: T_String_6 -> T_Pointwise_48
du_'8776''45'reflexive_8 T_String_6
v0
  = ([Any] -> T_Pointwise_48) -> Any -> T_Pointwise_48
forall a b. a -> b
coe
      [Any] -> T_Pointwise_48
MAlonzo.Code.Data.List.Relation.Binary.Pointwise.du_'8801''8658'Pointwise'45''8801'_578
      ((T_String_6 -> String) -> T_String_6 -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v0)
-- Data.String.Properties.≈-refl
d_'8776''45'refl_10 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48
d_'8776''45'refl_10 :: T_String_6 -> T_Pointwise_48
d_'8776''45'refl_10 T_String_6
v0 = (T_String_6 -> T_Pointwise_48) -> Any -> T_Pointwise_48
forall a b. a -> b
coe T_String_6 -> T_Pointwise_48
du_'8776''45'reflexive_8 (T_String_6 -> Any
forall a b. a -> b
coe T_String_6
v0)
-- Data.String.Properties.≈-sym
d_'8776''45'sym_14 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48
d_'8776''45'sym_14 :: T_String_6 -> T_String_6 -> T_Pointwise_48 -> T_Pointwise_48
d_'8776''45'sym_14 T_String_6
v0 T_String_6
v1
  = ((Any -> Any -> Any -> Any)
 -> [Any] -> [Any] -> T_Pointwise_48 -> T_Pointwise_48)
-> Any -> Any -> Any -> T_Pointwise_48 -> T_Pointwise_48
forall a b. a -> b
coe
      (Any -> Any -> Any -> Any)
-> [Any] -> [Any] -> T_Pointwise_48 -> T_Pointwise_48
MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Properties.du_symmetric_40
      Any
forall a. a
erased
      (((Any -> Any) -> (Any -> Any -> Any) -> Any -> Any -> Any)
-> (T_String_6 -> String)
-> (Any -> Any -> Any)
-> T_String_6
-> T_String_6
-> Any
forall a b. a -> b
coe
         (Any -> Any) -> (Any -> Any -> Any) -> Any -> Any -> Any
MAlonzo.Code.Function.Base.du__'45''10216'_'8739'_302
         T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12
         (\ Any
v2 Any
v3 -> Any
v2) T_String_6
v0 T_String_6
v1)
      (((Any -> Any -> Any) -> (Any -> Any) -> Any -> Any -> Any)
-> (Any -> Any -> Any)
-> (T_String_6 -> String)
-> T_String_6
-> T_String_6
-> Any
forall a b. a -> b
coe
         (Any -> Any -> Any) -> (Any -> Any) -> Any -> Any -> Any
MAlonzo.Code.Function.Base.du_'8739'_'10217''45'__308
         (\ Any
v2 Any
v3 -> Any
v3)
         T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v0 T_String_6
v1)
-- Data.String.Properties.≈-trans
d_'8776''45'trans_16 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48
d_'8776''45'trans_16 :: T_String_6
-> T_String_6
-> T_String_6
-> T_Pointwise_48
-> T_Pointwise_48
-> T_Pointwise_48
d_'8776''45'trans_16 T_String_6
v0 T_String_6
v1 T_String_6
v2
  = ((Any -> Any -> Any -> Any -> Any -> Any)
 -> [Any]
 -> [Any]
 -> [Any]
 -> T_Pointwise_48
 -> T_Pointwise_48
 -> T_Pointwise_48)
-> Any
-> Any
-> Any
-> Any
-> T_Pointwise_48
-> T_Pointwise_48
-> T_Pointwise_48
forall a b. a -> b
coe
      (Any -> Any -> Any -> Any -> Any -> Any)
-> [Any]
-> [Any]
-> [Any]
-> T_Pointwise_48
-> T_Pointwise_48
-> T_Pointwise_48
MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Properties.du_transitive_50
      Any
forall a. a
erased
      (((Any -> Any) -> (Any -> Any -> Any) -> Any -> Any -> Any)
-> (T_String_6 -> String)
-> (Any -> Any -> Any)
-> T_String_6
-> T_String_6
-> Any
forall a b. a -> b
coe
         (Any -> Any) -> (Any -> Any -> Any) -> Any -> Any -> Any
MAlonzo.Code.Function.Base.du__'45''10216'_'8739'_302
         T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12
         (\ Any
v3 Any
v4 -> Any
v3) T_String_6
v0 T_String_6
v1)
      (((Any -> Any -> Any) -> (Any -> Any) -> Any -> Any -> Any)
-> (Any -> Any -> Any)
-> (T_String_6 -> String)
-> T_String_6
-> T_String_6
-> Any
forall a b. a -> b
coe
         (Any -> Any -> Any) -> (Any -> Any) -> Any -> Any -> Any
MAlonzo.Code.Function.Base.du_'8739'_'10217''45'__308
         (\ Any
v3 Any
v4 -> Any
v4)
         T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v0 T_String_6
v1)
      (((Any -> Any -> Any) -> (Any -> Any) -> Any -> Any -> Any)
-> (Any -> Any -> Any)
-> (T_String_6 -> String)
-> T_String_6
-> T_String_6
-> Any
forall a b. a -> b
coe
         (Any -> Any -> Any) -> (Any -> Any) -> Any -> Any -> Any
MAlonzo.Code.Function.Base.du_'8739'_'10217''45'__308
         (\ Any
v3 Any
v4 -> Any
v4)
         T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v1 T_String_6
v2)
-- Data.String.Properties.≈-subst
d_'8776''45'subst_20 ::
  MAlonzo.Code.Agda.Primitive.T_Level_18 ->
  (MAlonzo.Code.Agda.Builtin.String.T_String_6 -> ()) ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Base.T_Pointwise_48 ->
  AgdaAny -> AgdaAny
d_'8776''45'subst_20 :: T_Level_18
-> (T_String_6 -> T_Level_18)
-> T_String_6
-> T_String_6
-> T_Pointwise_48
-> Any
-> Any
d_'8776''45'subst_20 ~T_Level_18
v0 ~T_String_6 -> T_Level_18
v1 ~T_String_6
v2 ~T_String_6
v3 ~T_Pointwise_48
v4 Any
v5
  = Any -> Any
du_'8776''45'subst_20 Any
v5
du_'8776''45'subst_20 :: AgdaAny -> AgdaAny
du_'8776''45'subst_20 :: Any -> Any
du_'8776''45'subst_20 Any
v0 = Any -> Any
forall a b. a -> b
coe Any
v0
-- Data.String.Properties._≈?_
d__'8776''63'__28 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Relation.Nullary.T_Dec_32
d__'8776''63'__28 :: T_String_6 -> T_String_6 -> T_Dec_32
d__'8776''63'__28 T_String_6
v0 T_String_6
v1
  = ((Any -> Any -> T_Dec_32) -> [Any] -> [Any] -> T_Dec_32)
-> Any -> Any -> Any -> T_Dec_32
forall a b. a -> b
coe
      (Any -> Any -> T_Dec_32) -> [Any] -> [Any] -> T_Dec_32
MAlonzo.Code.Data.List.Relation.Binary.Pointwise.Properties.du_decidable_112
      ((T_Char_6 -> T_Char_6 -> T_Dec_32) -> Any
forall a b. a -> b
coe T_Char_6 -> T_Char_6 -> T_Dec_32
MAlonzo.Code.Data.Char.Properties.d__'8799'__14)
      ((T_String_6 -> String) -> T_String_6 -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v0)
      ((T_String_6 -> String) -> T_String_6 -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v1)
-- Data.String.Properties.≈-isEquivalence
d_'8776''45'isEquivalence_34 ::
  MAlonzo.Code.Relation.Binary.Structures.T_IsEquivalence_26
d_'8776''45'isEquivalence_34 :: T_IsEquivalence_26
d_'8776''45'isEquivalence_34
  = ((Any -> Any)
 -> (Any -> Any -> Any -> Any)
 -> (Any -> Any -> Any -> Any -> Any -> Any)
 -> T_IsEquivalence_26)
-> Any -> Any -> Any -> T_IsEquivalence_26
forall a b. a -> b
coe
      (Any -> Any)
-> (Any -> Any -> Any -> Any)
-> (Any -> Any -> Any -> Any -> Any -> Any)
-> T_IsEquivalence_26
MAlonzo.Code.Relation.Binary.Structures.C_IsEquivalence'46'constructor_743
      ((T_String_6 -> T_Pointwise_48) -> Any
forall a b. a -> b
coe T_String_6 -> T_Pointwise_48
d_'8776''45'refl_10) ((T_String_6 -> T_String_6 -> T_Pointwise_48 -> T_Pointwise_48)
-> Any
forall a b. a -> b
coe T_String_6 -> T_String_6 -> T_Pointwise_48 -> T_Pointwise_48
d_'8776''45'sym_14)
      ((T_String_6
 -> T_String_6
 -> T_String_6
 -> T_Pointwise_48
 -> T_Pointwise_48
 -> T_Pointwise_48)
-> Any
forall a b. a -> b
coe T_String_6
-> T_String_6
-> T_String_6
-> T_Pointwise_48
-> T_Pointwise_48
-> T_Pointwise_48
d_'8776''45'trans_16)
-- Data.String.Properties.≈-setoid
d_'8776''45'setoid_48 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_Setoid_44
d_'8776''45'setoid_48 :: T_Setoid_44
d_'8776''45'setoid_48
  = (T_IsEquivalence_26 -> T_Setoid_44)
-> T_IsEquivalence_26 -> T_Setoid_44
forall a b. a -> b
coe
      T_IsEquivalence_26 -> T_Setoid_44
MAlonzo.Code.Relation.Binary.Bundles.C_Setoid'46'constructor_727
      T_IsEquivalence_26
d_'8776''45'isEquivalence_34
-- Data.String.Properties.≈-isDecEquivalence
d_'8776''45'isDecEquivalence_50 ::
  MAlonzo.Code.Relation.Binary.Structures.T_IsDecEquivalence_44
d_'8776''45'isDecEquivalence_50 :: T_IsDecEquivalence_44
d_'8776''45'isDecEquivalence_50
  = (T_IsEquivalence_26
 -> (Any -> Any -> T_Dec_32) -> T_IsDecEquivalence_44)
-> Any -> Any -> T_IsDecEquivalence_44
forall a b. a -> b
coe
      T_IsEquivalence_26
-> (Any -> Any -> T_Dec_32) -> T_IsDecEquivalence_44
MAlonzo.Code.Relation.Binary.Structures.C_IsDecEquivalence'46'constructor_3075
      (T_IsEquivalence_26 -> Any
forall a b. a -> b
coe T_IsEquivalence_26
d_'8776''45'isEquivalence_34) ((T_String_6 -> T_String_6 -> T_Dec_32) -> Any
forall a b. a -> b
coe T_String_6 -> T_String_6 -> T_Dec_32
d__'8776''63'__28)
-- Data.String.Properties.≈-decSetoid
d_'8776''45'decSetoid_52 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_DecSetoid_84
d_'8776''45'decSetoid_52 :: T_DecSetoid_84
d_'8776''45'decSetoid_52
  = (T_IsDecEquivalence_44 -> T_DecSetoid_84)
-> T_IsDecEquivalence_44 -> T_DecSetoid_84
forall a b. a -> b
coe
      T_IsDecEquivalence_44 -> T_DecSetoid_84
MAlonzo.Code.Relation.Binary.Bundles.C_DecSetoid'46'constructor_1385
      T_IsDecEquivalence_44
d_'8776''45'isDecEquivalence_50
-- Data.String.Properties._≟_
d__'8799'__54 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Relation.Nullary.T_Dec_32
d__'8799'__54 :: T_String_6 -> T_String_6 -> T_Dec_32
d__'8799'__54 T_String_6
v0 T_String_6
v1
  = ((Any -> Any) -> T_Dec_32 -> T_Dec_32) -> Any -> Any -> T_Dec_32
forall a b. a -> b
coe
      (Any -> Any) -> T_Dec_32 -> T_Dec_32
MAlonzo.Code.Relation.Nullary.Decidable.Core.du_map'8242'_168
      Any
forall a. a
erased ((T_String_6 -> T_String_6 -> T_Dec_32) -> Any -> Any -> Any
forall a b. a -> b
coe T_String_6 -> T_String_6 -> T_Dec_32
d__'8776''63'__28 (T_String_6 -> Any
forall a b. a -> b
coe T_String_6
v0) (T_String_6 -> Any
forall a b. a -> b
coe T_String_6
v1))
-- Data.String.Properties.≡-setoid
d_'8801''45'setoid_60 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_Setoid_44
d_'8801''45'setoid_60 :: T_Setoid_44
d_'8801''45'setoid_60
  = T_Setoid_44 -> T_Setoid_44
forall a b. a -> b
coe
      T_Setoid_44
MAlonzo.Code.Relation.Binary.PropositionalEquality.Properties.du_setoid_250
-- Data.String.Properties.≡-decSetoid
d_'8801''45'decSetoid_62 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_DecSetoid_84
d_'8801''45'decSetoid_62 :: T_DecSetoid_84
d_'8801''45'decSetoid_62
  = ((Any -> Any -> T_Dec_32) -> T_DecSetoid_84)
-> Any -> T_DecSetoid_84
forall a b. a -> b
coe
      (Any -> Any -> T_Dec_32) -> T_DecSetoid_84
MAlonzo.Code.Relation.Binary.PropositionalEquality.Properties.du_decSetoid_254
      ((T_String_6 -> T_String_6 -> T_Dec_32) -> Any
forall a b. a -> b
coe T_String_6 -> T_String_6 -> T_Dec_32
d__'8799'__54)
-- Data.String.Properties._<?_
d__'60''63'__64 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Relation.Nullary.T_Dec_32
d__'60''63'__64 :: T_String_6 -> T_String_6 -> T_Dec_32
d__'60''63'__64 T_String_6
v0 T_String_6
v1
  = ((Any -> Any -> T_Dec_32)
 -> (Any -> Any -> T_Dec_32) -> [Any] -> [Any] -> T_Dec_32)
-> (T_Char_6 -> T_Char_6 -> T_Dec_32)
-> (T_Char_6 -> T_Char_6 -> T_Dec_32)
-> Any
-> Any
-> T_Dec_32
forall a b. a -> b
coe
      (Any -> Any -> T_Dec_32)
-> (Any -> Any -> T_Dec_32) -> [Any] -> [Any] -> T_Dec_32
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'60''45'decidable_270
      T_Char_6 -> T_Char_6 -> T_Dec_32
MAlonzo.Code.Data.Char.Properties.d__'8799'__14
      T_Char_6 -> T_Char_6 -> T_Dec_32
MAlonzo.Code.Data.Char.Properties.d__'60''63'__44
      ((T_String_6 -> String) -> T_String_6 -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v0)
      ((T_String_6 -> String) -> T_String_6 -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12 T_String_6
v1)
-- Data.String.Properties.<-isStrictPartialOrder-≈
d_'60''45'isStrictPartialOrder'45''8776'_70 ::
  MAlonzo.Code.Relation.Binary.Structures.T_IsStrictPartialOrder_266
d_'60''45'isStrictPartialOrder'45''8776'_70 :: T_IsStrictPartialOrder_266
d_'60''45'isStrictPartialOrder'45''8776'_70
  = ((Any -> Any)
 -> T_IsStrictPartialOrder_266 -> T_IsStrictPartialOrder_266)
-> Any -> Any -> T_IsStrictPartialOrder_266
forall a b. a -> b
coe
      (Any -> Any)
-> T_IsStrictPartialOrder_266 -> T_IsStrictPartialOrder_266
MAlonzo.Code.Relation.Binary.Construct.On.du_isStrictPartialOrder_356
      ((T_String_6 -> String) -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12)
      ((T_IsStrictPartialOrder_266 -> T_IsStrictPartialOrder_266)
-> Any -> Any
forall a b. a -> b
coe
         T_IsStrictPartialOrder_266 -> T_IsStrictPartialOrder_266
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'60''45'isStrictPartialOrder_274
         (T_IsStrictPartialOrder_266 -> Any
forall a b. a -> b
coe
            T_IsStrictPartialOrder_266
MAlonzo.Code.Data.Char.Properties.d_'60''45'isStrictPartialOrder_102))
-- Data.String.Properties.<-isStrictTotalOrder-≈
d_'60''45'isStrictTotalOrder'45''8776'_72 ::
  MAlonzo.Code.Relation.Binary.Structures.T_IsStrictTotalOrder_502
d_'60''45'isStrictTotalOrder'45''8776'_72 :: T_IsStrictTotalOrder_502
d_'60''45'isStrictTotalOrder'45''8776'_72
  = ((Any -> Any)
 -> T_IsStrictTotalOrder_502 -> T_IsStrictTotalOrder_502)
-> Any -> Any -> T_IsStrictTotalOrder_502
forall a b. a -> b
coe
      (Any -> Any)
-> T_IsStrictTotalOrder_502 -> T_IsStrictTotalOrder_502
MAlonzo.Code.Relation.Binary.Construct.On.du_isStrictTotalOrder_500
      ((T_String_6 -> String) -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12)
      ((T_IsStrictTotalOrder_502 -> T_IsStrictTotalOrder_502)
-> Any -> Any
forall a b. a -> b
coe
         T_IsStrictTotalOrder_502 -> T_IsStrictTotalOrder_502
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'60''45'isStrictTotalOrder_312
         (T_IsStrictTotalOrder_502 -> Any
forall a b. a -> b
coe
            T_IsStrictTotalOrder_502
MAlonzo.Code.Data.Char.Properties.d_'60''45'isStrictTotalOrder_118))
-- Data.String.Properties.<-strictPartialOrder-≈
d_'60''45'strictPartialOrder'45''8776'_74 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_StrictPartialOrder_472
d_'60''45'strictPartialOrder'45''8776'_74 :: T_StrictPartialOrder_472
d_'60''45'strictPartialOrder'45''8776'_74
  = (T_StrictPartialOrder_472
 -> (Any -> Any) -> T_StrictPartialOrder_472)
-> Any -> Any -> T_StrictPartialOrder_472
forall a b. a -> b
coe
      T_StrictPartialOrder_472
-> (Any -> Any) -> T_StrictPartialOrder_472
MAlonzo.Code.Relation.Binary.Construct.On.du_strictPartialOrder_594
      ((T_StrictPartialOrder_472 -> T_StrictPartialOrder_472)
-> Any -> Any
forall a b. a -> b
coe
         T_StrictPartialOrder_472 -> T_StrictPartialOrder_472
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'60''45'strictPartialOrder_370
         (T_StrictPartialOrder_472 -> Any
forall a b. a -> b
coe
            T_StrictPartialOrder_472
MAlonzo.Code.Data.Char.Properties.d_'60''45'strictPartialOrder_126))
      ((T_String_6 -> String) -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12)
-- Data.String.Properties.<-strictTotalOrder-≈
d_'60''45'strictTotalOrder'45''8776'_76 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_StrictTotalOrder_864
d_'60''45'strictTotalOrder'45''8776'_76 :: T_StrictTotalOrder_864
d_'60''45'strictTotalOrder'45''8776'_76
  = (T_StrictTotalOrder_864 -> (Any -> Any) -> T_StrictTotalOrder_864)
-> Any -> Any -> T_StrictTotalOrder_864
forall a b. a -> b
coe
      T_StrictTotalOrder_864 -> (Any -> Any) -> T_StrictTotalOrder_864
MAlonzo.Code.Relation.Binary.Construct.On.du_strictTotalOrder_618
      ((T_StrictTotalOrder_864 -> T_StrictTotalOrder_864) -> Any -> Any
forall a b. a -> b
coe
         T_StrictTotalOrder_864 -> T_StrictTotalOrder_864
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'60''45'strictTotalOrder_434
         (T_StrictTotalOrder_864 -> Any
forall a b. a -> b
coe
            T_StrictTotalOrder_864
MAlonzo.Code.Data.Char.Properties.d_'60''45'strictTotalOrder_128))
      ((T_String_6 -> String) -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12)
-- Data.String.Properties.≤-isDecPartialOrder-≈
d_'8804''45'isDecPartialOrder'45''8776'_78 ::
  MAlonzo.Code.Relation.Binary.Structures.T_IsDecPartialOrder_206
d_'8804''45'isDecPartialOrder'45''8776'_78 :: T_IsDecPartialOrder_206
d_'8804''45'isDecPartialOrder'45''8776'_78
  = ((Any -> Any)
 -> T_IsDecPartialOrder_206 -> T_IsDecPartialOrder_206)
-> Any -> Any -> T_IsDecPartialOrder_206
forall a b. a -> b
coe
      (Any -> Any) -> T_IsDecPartialOrder_206 -> T_IsDecPartialOrder_206
MAlonzo.Code.Relation.Binary.Construct.On.du_isDecPartialOrder_304
      ((T_String_6 -> String) -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12)
      ((T_IsStrictTotalOrder_502 -> T_IsDecPartialOrder_206) -> Any -> Any
forall a b. a -> b
coe
         T_IsStrictTotalOrder_502 -> T_IsDecPartialOrder_206
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'8804''45'isDecPartialOrder_706
         (T_IsStrictTotalOrder_502 -> Any
forall a b. a -> b
coe
            T_IsStrictTotalOrder_502
MAlonzo.Code.Data.Char.Properties.d_'60''45'isStrictTotalOrder_118))
-- Data.String.Properties.≤-decPoset-≈
d_'8804''45'decPoset'45''8776'_80 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_DecPoset_360
d_'8804''45'decPoset'45''8776'_80 :: T_DecPoset_360
d_'8804''45'decPoset'45''8776'_80
  = (T_DecPoset_360 -> (Any -> Any) -> T_DecPoset_360)
-> Any -> Any -> T_DecPoset_360
forall a b. a -> b
coe
      T_DecPoset_360 -> (Any -> Any) -> T_DecPoset_360
MAlonzo.Code.Relation.Binary.Construct.On.du_decPoset_586
      ((T_StrictTotalOrder_864 -> T_DecPoset_360) -> Any -> Any
forall a b. a -> b
coe
         T_StrictTotalOrder_864 -> T_DecPoset_360
MAlonzo.Code.Data.List.Relation.Binary.Lex.Strict.du_'8804''45'decPoset_994
         (T_StrictTotalOrder_864 -> Any
forall a b. a -> b
coe
            T_StrictTotalOrder_864
MAlonzo.Code.Data.Char.Properties.d_'60''45'strictTotalOrder_128))
      ((T_String_6 -> String) -> Any
forall a b. a -> b
coe T_String_6 -> String
MAlonzo.Code.Agda.Builtin.String.d_primStringToList_12)
-- Data.String.Properties._==_
d__'61''61'__82 ::
  MAlonzo.Code.Agda.Builtin.String.T_String_6 ->
  MAlonzo.Code.Agda.Builtin.String.T_String_6 -> Bool
d__'61''61'__82 :: T_String_6 -> T_String_6 -> Bool
d__'61''61'__82 T_String_6
v0 T_String_6
v1
  = (T_Dec_32 -> Bool) -> Any -> Bool
forall a b. a -> b
coe
      T_Dec_32 -> Bool
MAlonzo.Code.Relation.Nullary.Decidable.Core.du_isYes_16
      ((T_String_6 -> T_String_6 -> T_Dec_32) -> Any -> Any -> Any
forall a b. a -> b
coe T_String_6 -> T_String_6 -> T_Dec_32
d__'8799'__54 (T_String_6 -> Any
forall a b. a -> b
coe T_String_6
v0) (T_String_6 -> Any
forall a b. a -> b
coe T_String_6
v1))
-- Data.String.Properties.setoid
d_setoid_96 :: MAlonzo.Code.Relation.Binary.Bundles.T_Setoid_44
d_setoid_96 :: T_Setoid_44
d_setoid_96 = T_Setoid_44 -> T_Setoid_44
forall a b. a -> b
coe T_Setoid_44
d_'8801''45'setoid_60
-- Data.String.Properties.decSetoid
d_decSetoid_98 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_DecSetoid_84
d_decSetoid_98 :: T_DecSetoid_84
d_decSetoid_98 = T_DecSetoid_84 -> T_DecSetoid_84
forall a b. a -> b
coe T_DecSetoid_84
d_'8801''45'decSetoid_62
-- Data.String.Properties.strictTotalOrder
d_strictTotalOrder_100 ::
  MAlonzo.Code.Relation.Binary.Bundles.T_StrictTotalOrder_864
d_strictTotalOrder_100 :: T_StrictTotalOrder_864
d_strictTotalOrder_100
  = T_StrictTotalOrder_864 -> T_StrictTotalOrder_864
forall a b. a -> b
coe T_StrictTotalOrder_864
d_'60''45'strictTotalOrder'45''8776'_76