MCDP_schema_lean.lean

-- Auto-generated Lean 4 code from OpenAPI schema

import Lean.Data.Json
import Std.Data.TreeMap

set_option maxHeartbeats 1000000

namespace Format2



structure UpperSet_Unused where
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure UpperSet_UpperClosure where
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The points in the set. -/
  points : List (Lean.Json)


structure Unit_None where
  /-- A human-readable description of the unit (debug purposes). -/
  description : Option (String)
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure Unit_Single where
  /-- A human-readable description of the unit (debug purposes). -/
  description : Option (String)
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A string representing the unit.  -/
  units : String


structure U_Catalog_Options where
  f : Lean.Json
  i : Lean.Json
  r : Lean.Json


structure U1_Catalog_Options where
  f : Lean.Json
  r : Lean.Json


structure MapCheck_Data where
  /-- Time taken to compute the result. -/
  elapsed : Option (Float)
  x : Lean.Json
  y : Lean.Json


structure Range where
  /-- Total number of elements in the array. -/
  ntot : Int
  /-- Start of the range (inclusive). -/
  start : Int
  /-- End of the range (exclusive). -/
  stop : Int
  /-- Type marker -/
  type : String


structure Projection where
  /-- The index of the element to project. -/
  index : Int
  /-- The total number of elements in the product. -/
  ntot : Int
  /-- Type marker -/
  type : String


structure M_Explicit_Option where
  x : Lean.Json
  y : Lean.Json


structure LowerSet_Unused where
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure LowerSet_LowerClosure where
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  points : List (Lean.Json)


structure L_Catalog_Options where
  f : Lean.Json
  i : Lean.Json
  r : Lean.Json


structure L1_Catalog_Options where
  f : Lean.Json
  r : Lean.Json


mutual

inductive Unit : Type
  | Unit_None (data : Unit_None)
  | Unit_Single (data : Unit_Single)
  | Unit_Vector (data : Unit_Vector)
  | Unit_Wrapped (data : Unit_Wrapped)

/-- Base fields for Unit -/
structure UnitFields where
  /-- A human-readable description of the unit (debug purposes). -/
  description : Option (String)
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure Unit_Vector where
  /-- A human-readable description of the unit (debug purposes). -/
  description : Option (String)
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- labels for the subunits  -/
  labels : Option (List (String))
  /-- The subunits.  -/
  subs : List (Unit)


structure Unit_Wrapped where
  /-- A human-readable description of the unit (debug purposes). -/
  description : Option (String)
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  inside : List (Unit)
  name : String
  shape : Lean.Json



end -- end mutual
inductive UpperSet : Type
  | UpperSet_Unused (data : UpperSet_Unused)
  | UpperSet_UpperClosure (data : UpperSet_UpperClosure)

/-- Base fields for UpperSet -/
structure UpperSetFields where
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure UCheck_Data where
  /-- Time taken for the check in seconds. -/
  elapsed : Option (Float)
  x : Lean.Json
  y : UpperSet


structure U1_Explicit_Option where
  x : Lean.Json
  y : UpperSet


structure U1Check_Data where
  /-- Time taken for the check in seconds. -/
  elapsed : Option (Float)
  x : Lean.Json
  y : UpperSet


structure SUCheck_Data where
  opt : Lean.Json
  /-- Time taken for the check in seconds. -/
  opt_elapsed : Option (Float)
  opt_y : UpperSet
  pess : Lean.Json
  /-- Time taken for the check in seconds. -/
  pess_elapsed : Option (Float)
  pess_y : UpperSet
  x : Lean.Json


structure SU1Check_Data where
  opt : Lean.Json
  /-- Time taken for the check in seconds. -/
  opt_elapsed : Option (Float)
  opt_y : UpperSet
  pess : Lean.Json
  /-- Time taken for the check in seconds. -/
  pess_elapsed : Option (Float)
  pess_y : UpperSet
  x : Lean.Json


inductive LowerSet : Type
  | LowerSet_LowerClosure (data : LowerSet_LowerClosure)
  | LowerSet_Unused (data : LowerSet_Unused)

/-- Base fields for LowerSet -/
structure LowerSetFields where
  /-- Kind marker. -/
  kind : String
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SLCheck_Data where
  opt : Lean.Json
  /-- Time taken for the check in seconds. -/
  opt_elapsed : Option (Float)
  opt_y : LowerSet
  pess : Lean.Json
  /-- Time taken for the check in seconds. -/
  pess_elapsed : Option (Float)
  pess_y : LowerSet
  x : Lean.Json


structure SL1Check_Data where
  opt : Lean.Json
  /-- Time taken for the check in seconds. -/
  opt_elapsed : Option (Float)
  opt_y : LowerSet
  pess : Lean.Json
  /-- Time taken for the check in seconds. -/
  pess_elapsed : Option (Float)
  pess_y : LowerSet
  x : Lean.Json


structure LCheck_Data where
  /-- Time taken for the check in seconds. -/
  elapsed : Option (Float)
  x : Lean.Json
  y : LowerSet


structure L1_Explicit_Option where
  /-- A point in the domain of the map.  -/
  x : Lean.Json
  /-- The lower set corresponding to the point `x` in the domain.  -/
  y : LowerSet


structure L1Check_Data where
  /-- Time taken for the check in seconds (optional). -/
  elapsed : Option (Float)
  x : Lean.Json
  /-- Expected result (a lower set). -/
  y : LowerSet


structure DP_Catalog_Options where
  /-- Blueprint -/
  b : Lean.Json
  /-- Functionality -/
  f : Lean.Json
  /-- Implementation -/
  i : Lean.Json
  /-- Requirement -/
  r : Lean.Json


structure ModelRequirement where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  requirement : String


structure NodeFunctionality where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  node : String
  node_functionality : String


structure ModelFunctionality where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  functionality : String


structure NodeRequirement where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  node : String
  node_requirement : String


inductive ConnectionSource : Type
  | ModelFunctionality (data : ModelFunctionality)
  | NodeRequirement (data : NodeRequirement)

/-- Base fields for ConnectionSource -/
structure ConnectionSourceFields where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


inductive ConnectionTarget : Type
  | ModelRequirement (data : ModelRequirement)
  | NodeFunctionality (data : NodeFunctionality)

/-- Base fields for ConnectionTarget -/
structure ConnectionTargetFields where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure Connection where
  /-- The source of the connection. -/
  source : ConnectionSource
  /-- The target of the connection. -/
  target : ConnectionTarget
  /-- Type marker. -/
  type : String


structure Address where
  /-- The library name -/
  library : String
  /-- The Git repository URL -/
  repo : Option (String)
  /-- The type of object -/
  spec : String
  /-- The name of the object -/
  thing : String
  /-- Type marker -/
  type : String


structure P_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure P_Integer where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String) := none
  /-- Unique hash for the object. -/
  hash : Option (String) := none
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String := "Poset"
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String) := none
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address) := none
  /-- Discriminator variable to distinguish subtypes. -/
  type : String := "P_Integer"
  /-- Bit size of the integer.  -/
  size : String


structure P_Fractions where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Maximum absolute value for the denominator.  -/
  max_abs_denominator : Int
  /-- Maximum absolute value for the numerator.  -/
  max_abs_numerator : Int
  /-- Precision of the fraction.  -/
  size : String


structure P_Float where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Precision of the floating point number. Current supported values are f32 and f64.  -/
  size : String


structure P_Finite where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Aliases for the elements of the poset. The keys are the aliases, and the values are arrays of elements that are equivalent to the alias.  -/
  aliases : Option (List (String × List (String)))
  /-- The elements of the poset, strings.  -/
  elements : List (String)
  /-- The relations of the poset, each relation is a pair of elements. The first element is less than the second element.  -/
  relations : List (List (String))


structure P_Decimal where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Number of decimal places.  -/
  precision : Int


structure P_Bool where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String) := none
  /-- Unique hash for the object. -/
  hash : Option (String) := none
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String := "Poset"
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String) := none
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address) := none
  /-- Discriminator variable to distinguish subtypes. -/
  type : String := "P_Bool"


mutual

inductive Poset : Type
  | P_Bool (data : P_Bool)
  | P_C_Arrow (data : P_C_Arrow)
  | P_C_Discretized (data : P_C_Discretized)
  | P_C_Lexicographic (data : P_C_Lexicographic)
  | P_C_LowerSets (data : P_C_LowerSets)
  | P_C_Multisets (data : P_C_Multisets)
  | P_C_Opposite (data : P_C_Opposite)
  | P_C_Power (data : P_C_Power)
  | P_C_Product (data : P_C_Product)
  | P_C_ProductDS (data : P_C_ProductDS)
  | P_C_ProductSmash (data : P_C_ProductSmash)
  | P_C_Sum (data : P_C_Sum)
  | P_C_SumSmash (data : P_C_SumSmash)
  | P_C_Twisted (data : P_C_Twisted)
  | P_C_Units (data : P_C_Units)
  | P_C_UpperSets (data : P_C_UpperSets)
  | P_Decimal (data : P_Decimal)
  | P_F_Bounded (data : P_F_Bounded)
  | P_F_C_Intersection (data : P_F_C_Intersection)
  | P_F_C_Union (data : P_F_C_Union)
  | P_F_Interval (data : P_F_Interval)
  | P_F_LowerClosure (data : P_F_LowerClosure)
  | P_F_Subposet (data : P_F_Subposet)
  | P_F_UpperClosure (data : P_F_UpperClosure)
  | P_Finite (data : P_Finite)
  | P_Float (data : P_Float)
  | P_Fractions (data : P_Fractions)
  | P_Integer (data : P_Integer)
  | P_Unknown (data : P_Unknown)

/-- Base fields for Poset -/
structure PosetFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure P_C_Arrow where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_C_Discretized where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_C_Lexicographic where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the posets.  -/
  labels : Option (List (String))
  /-- A list of posets that are composed together.  -/
  subs : List (Poset)


structure P_C_LowerSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_C_Multisets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Poset describing the counts of the elements in the multisets.  -/
  counts : Poset
  /-- Poset describing the values of the multisets.  -/
  values : Poset


structure P_C_Opposite where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_C_Power where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_C_Product where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String) := none
  /-- Unique hash for the object. -/
  hash : Option (String) := none
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String := "Poset"
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String) := none
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address) := none
  /-- Discriminator variable to distinguish subtypes. -/
  type : String := "P_C_Product"
  /-- A list of labels for the posets.  -/
  labels : Option (List (String)) := none
  /-- A list of posets that are composed together.  -/
  subs : List (Poset)


structure P_C_ProductDS where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the posets.  -/
  labels : Option (List (String))
  /-- A list of posets that are composed together.  -/
  subs : List (Poset)


structure P_C_ProductSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the posets.  -/
  labels : Option (List (String))
  /-- Whether each poset is "naked" or not. -/
  naked : List (Bool)
  /-- The ranges of the posets in the smash product. See also P_C_Sum  -/
  ranges : List (Range)
  /-- A list of posets that are composed together.  -/
  subs : List (Poset)


structure P_C_Sum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the posets.  -/
  labels : Option (List (String))
  /-- A list of posets that are composed together.  -/
  subs : List (Poset)


structure P_C_SumSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the posets.  -/
  labels : Option (List (String))
  naked : List (Bool)
  ranges : List (Range)
  /-- A list of posets that are composed together.  -/
  subs : List (Poset)
  trivial : Bool


structure P_C_Twisted where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_C_Units where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset
  /-- The units of the poset.  -/
  units : Unit


structure P_C_UpperSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The base poset.  -/
  poset : Poset


structure P_F_Bounded where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  bottom : Lean.Json
  bound_high : Lean.Json
  bound_low : Lean.Json
  offset : Lean.Json
  /-- The ambient poset.  -/
  poset : Poset
  step : String
  top : Lean.Json


structure P_F_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The ambient poset that includes the others.  -/
  ambient : Poset
  /-- Labels for the posets.  -/
  labels : Option (List (String))
  /-- The posets that are included in the intersection. They are all subposets of the ambient poset.  -/
  subs : List (Poset)


structure P_F_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The ambient poset that includes the others.  -/
  ambient : Poset
  /-- Labels for the posets.  -/
  labels : Option (List (String))
  /-- The posets that are included in the union. They are all subposets of the ambient poset.  -/
  subs : List (Poset)


structure P_F_Interval where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The upper bound of the interval. -/
  high : Lean.Json
  /-- The lower bound of the interval. -/
  low : Lean.Json
  /-- The ambient poset. -/
  poset : Poset


structure P_F_LowerClosure where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The lower set. -/
  ls : LowerSet
  /-- The ambient poset. -/
  poset : Poset


structure P_F_Subposet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The elements of the subposet.  -/
  elements : List (Lean.Json)
  /-- The ambient poset that contains the elements.  -/
  poset : Poset


structure P_F_UpperClosure where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The ambient poset. -/
  poset : Poset
  /-- The upper set. -/
  us : UpperSet



end -- end mutual
structure VU where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  poset : Poset
  value : Lean.Json


inductive Value : Type
  | VU (data : VU)

/-- Base fields for Value -/
structure ValueFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure QueryFixReqMaxFunData where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  f : Option (List (String × Value))
  optimize_for : Option (List (String))
  r : Option (List (String × Value))


structure QueryFixFunMinReqData where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  f : Option (List (String × Value))
  optimize_for : Option (List (String))
  r : Option (List (String × Value))


inductive QueryData : Type
  | QueryFixFunMinReqData (data : QueryFixFunMinReqData)
  | QueryFixReqMaxFunData (data : QueryFixReqMaxFunData)

/-- Base fields for QueryData -/
structure QueryDataFields where
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The upper set that is the value of the constant map.  -/
  value : UpperSet


structure U_Catalog where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The options in the catalog.  -/
  options : List (U_Catalog_Options)


structure U1_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_UnionOfPrinUpperSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_Uinv_JoinConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  join1_dom : Poset
  value : Value


structure U1_Uinv_Join where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  lower_bounds : List (List (Lean.Json))


structure U1_RepresentPrincipalUpperSet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_InvSum_Pes where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure U1_InvSum_Opt where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure U1_InvMul_Pes where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure U1_InvMul_Opt where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure U1_IntersectionOfPrinUpperSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_Explicit where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  options : List (U1_Explicit_Option)


structure U1_Entire where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  value : UpperSet


structure U1_Catalog where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  options : List (U1_Catalog_Options)


structure SU_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SU_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SU1_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SU1_InvSum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The poset where the operation is defined. -/
  opspace : Poset


structure SU1_InvMultiply where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The poset where the operation is defined. -/
  opspace : Poset


structure SU1_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SL_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SL_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SL1_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SL1_InvSum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The poset where the operation takes place -/
  opspace : Poset


structure SL1_InvMultiply where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The poset where the operation takes place -/
  opspace : Poset


structure SL1_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_X_Lt_C where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Poset in which the comparison is performed. -/
  opspace : Poset
  /-- Comparison value. -/
  value : Value


structure M_X_Leq_C where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Poset in which the comparison is performed. -/
  opspace : Poset
  /-- Comparison value. -/
  value : Value


structure M_Unlift where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_Undefined where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_TopIfNotBottom where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_Threshold2 where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  value : Value


structure M_Threshold1 where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  value : Value


structure M_TakeRange where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Describes the range of indices to take. -/
  range : Range


structure M_TakeIndex where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Describes the projection -/
  projection : Projection


structure M_SubUConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_SubLConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_SmashInjection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Which space to inject into -/
  index : Int


structure M_ScaleU where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  den : String
  num : String
  opspace : Poset


structure M_ScaleL where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  den : String
  num : String
  opspace : Poset


structure M_RoundUp where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  offset : Lean.Json
  opspace : Poset
  step : String


structure M_RoundDown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  offset : Lean.Json
  opspace : Poset
  step : String


structure M_RepresentPrincipalUpperSet_TotalOrderBounded where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_RepresentPrincipalLowerSet_TotalOrderBounded where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_ReprUpperSet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_ReprLowerSet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_PowerFracU where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  den : String
  num : String
  opspace : Poset


structure M_PowerFracL where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  den : String
  num : String
  opspace : Poset


structure M_MultiplyUConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_MultiplyU where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspaces : List (Poset)


structure M_MultiplyLConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_MultiplyL where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspaces : List (Poset)


structure M_MeetConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_Meet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The posets in which each meet is defined.  -/
  opspaces : List (Poset)


structure M_Lift where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_Leq where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Poset in which the comparison is performed. -/
  opspace : Poset


structure M_JoinConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_Join where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The posets in which each join is defined.  -/
  opspaces : List (Poset)


structure M_Injection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Which space to inject into -/
  index : Int


structure M_IdentityBelowThreshold where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Threshold value. -/
  threshold : Value
  /-- Value returned by the map if the input is above the threshold. This value must be greater than or equal to the threshold.  -/
  value : Value


structure M_Id where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_Floor0 where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset


structure M_Explicit where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  options : List (M_Explicit_Option)


structure M_Empty where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_DivideUConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_DivideLConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_ContainedInUpperSet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Must be a boolean poset. -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  upper_set : UpperSet


structure M_ContainedInLowerSet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Must be a boolean poset. -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  lower_set : LowerSet
  opspace : Poset


structure M_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  value : Value


structure M_Coerce where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_Ceil0 where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset


structure M_C_Lt_X where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Poset in which the comparison is performed. -/
  opspace : Poset
  /-- Comparison value. -/
  value : Value


structure M_C_Leq_X where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Poset in which the comparison is performed. -/
  opspace : Poset
  /-- Comparison value. -/
  value : Value


structure M_BottomIfNotTop where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_AddUConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_AddU where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspaces : List (Poset)


structure M_AddLConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspace : Poset
  value : Value


structure M_AddL where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  opspaces : List (Poset)


mutual

inductive MonotoneMap : Type
  | M_AddL (data : M_AddL)
  | M_AddLConstant (data : M_AddLConstant)
  | M_AddU (data : M_AddU)
  | M_AddUConstant (data : M_AddUConstant)
  | M_BottomIfNotTop (data : M_BottomIfNotTop)
  | M_C_Coproduct (data : M_C_Coproduct)
  | M_C_CoproductSmash (data : M_C_CoproductSmash)
  | M_C_DomProdCodSmash (data : M_C_DomProdCodSmash)
  | M_C_DomSmashCodProd (data : M_C_DomSmashCodProd)
  | M_C_DomUnion (data : M_C_DomUnion)
  | M_C_Leq_X (data : M_C_Leq_X)
  | M_C_LiftToSubsets (data : M_C_LiftToSubsets)
  | M_C_Lt_X (data : M_C_Lt_X)
  | M_C_Op (data : M_C_Op)
  | M_C_Parallel (data : M_C_Parallel)
  | M_C_ParallelSmash (data : M_C_ParallelSmash)
  | M_C_Product (data : M_C_Product)
  | M_C_ProductSmash (data : M_C_ProductSmash)
  | M_C_RefineDomain (data : M_C_RefineDomain)
  | M_C_Series (data : M_C_Series)
  | M_C_Sum (data : M_C_Sum)
  | M_C_SumSmash (data : M_C_SumSmash)
  | M_C_WrapUnits (data : M_C_WrapUnits)
  | M_Ceil0 (data : M_Ceil0)
  | M_Coerce (data : M_Coerce)
  | M_Constant (data : M_Constant)
  | M_ContainedInLowerSet (data : M_ContainedInLowerSet)
  | M_ContainedInUpperSet (data : M_ContainedInUpperSet)
  | M_DivideLConstant (data : M_DivideLConstant)
  | M_DivideUConstant (data : M_DivideUConstant)
  | M_Empty (data : M_Empty)
  | M_Explicit (data : M_Explicit)
  | M_Floor0 (data : M_Floor0)
  | M_Id (data : M_Id)
  | M_IdentityBelowThreshold (data : M_IdentityBelowThreshold)
  | M_Injection (data : M_Injection)
  | M_Join (data : M_Join)
  | M_JoinConstant (data : M_JoinConstant)
  | M_Leq (data : M_Leq)
  | M_Lift (data : M_Lift)
  | M_LiftToLowerSets (data : M_LiftToLowerSets)
  | M_LiftToUpperSets (data : M_LiftToUpperSets)
  | M_Meet (data : M_Meet)
  | M_MeetConstant (data : M_MeetConstant)
  | M_MultiplyL (data : M_MultiplyL)
  | M_MultiplyLConstant (data : M_MultiplyLConstant)
  | M_MultiplyU (data : M_MultiplyU)
  | M_MultiplyUConstant (data : M_MultiplyUConstant)
  | M_PowerFracL (data : M_PowerFracL)
  | M_PowerFracU (data : M_PowerFracU)
  | M_ReprLowerSet (data : M_ReprLowerSet)
  | M_ReprUpperSet (data : M_ReprUpperSet)
  | M_RepresentPrincipalLowerSet_TotalOrderBounded (data : M_RepresentPrincipalLowerSet_TotalOrderBounded)
  | M_RepresentPrincipalUpperSet_TotalOrderBounded (data : M_RepresentPrincipalUpperSet_TotalOrderBounded)
  | M_RoundDown (data : M_RoundDown)
  | M_RoundUp (data : M_RoundUp)
  | M_ScaleL (data : M_ScaleL)
  | M_ScaleU (data : M_ScaleU)
  | M_SmashInjection (data : M_SmashInjection)
  | M_SubLConstant (data : M_SubLConstant)
  | M_SubUConstant (data : M_SubUConstant)
  | M_TakeIndex (data : M_TakeIndex)
  | M_TakeRange (data : M_TakeRange)
  | M_Threshold1 (data : M_Threshold1)
  | M_Threshold2 (data : M_Threshold2)
  | M_TopIfNotBottom (data : M_TopIfNotBottom)
  | M_Undefined (data : M_Undefined)
  | M_Unknown (data : M_Unknown)
  | M_Unlift (data : M_Unlift)
  | M_X_Leq_C (data : M_X_Leq_C)
  | M_X_Lt_C (data : M_X_Lt_C)

/-- Base fields for MonotoneMap -/
structure MonotoneMapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure M_C_Coproduct where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_CoproductSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_DomProdCodSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_DomSmashCodProd where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_DomUnion where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_LiftToSubsets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The monotone map that is lifted.  -/
  m : MonotoneMap


structure M_C_Op where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure M_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_ParallelSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_Product where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_ProductSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure M_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_Sum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_SumSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the monotone maps.  -/
  labels : Option (List (String))
  maps : List (MonotoneMap)


structure M_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Units for the codomain of the monotone map.  -/
  cod_units : Unit
  /-- Units for the domain of the monotone map.  -/
  dom_units : Unit
  m : MonotoneMap


structure M_LiftToLowerSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The monotone map that is lifted.  -/
  m : MonotoneMap


structure M_LiftToUpperSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Codomain of the monotone map -/
  cod : Poset
  /-- Domain of the monotone map -/
  dom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The monotone map that is lifted.  -/
  m : MonotoneMap



end -- end mutual
structure U1_Lift where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure U1_L_Uinv where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure U1_FromFilter where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


mutual

inductive U1Map : Type
  | U1_C_CodSum (data : U1_C_CodSum)
  | U1_C_CodSumSmash (data : U1_C_CodSumSmash)
  | U1_C_DomUnion (data : U1_C_DomUnion)
  | U1_C_Intersection (data : U1_C_Intersection)
  | U1_C_Parallel (data : U1_C_Parallel)
  | U1_C_ProdIntersection (data : U1_C_ProdIntersection)
  | U1_C_Product (data : U1_C_Product)
  | U1_C_RefineDomain (data : U1_C_RefineDomain)
  | U1_C_Series (data : U1_C_Series)
  | U1_C_Trace (data : U1_C_Trace)
  | U1_C_Union (data : U1_C_Union)
  | U1_C_WrapUnits (data : U1_C_WrapUnits)
  | U1_Catalog (data : U1_Catalog)
  | U1_Constant (data : U1_Constant)
  | U1_Entire (data : U1_Entire)
  | U1_Explicit (data : U1_Explicit)
  | U1_FromFilter (data : U1_FromFilter)
  | U1_Identity (data : U1_Identity)
  | U1_IntersectionOfPrinUpperSets (data : U1_IntersectionOfPrinUpperSets)
  | U1_InvMul_Opt (data : U1_InvMul_Opt)
  | U1_InvMul_Pes (data : U1_InvMul_Pes)
  | U1_InvSum_Opt (data : U1_InvSum_Opt)
  | U1_InvSum_Pes (data : U1_InvSum_Pes)
  | U1_L_Uinv (data : U1_L_Uinv)
  | U1_Lift (data : U1_Lift)
  | U1_RepresentPrincipalUpperSet (data : U1_RepresentPrincipalUpperSet)
  | U1_Uinv_Join (data : U1_Uinv_Join)
  | U1_Uinv_JoinConstant (data : U1_Uinv_JoinConstant)
  | U1_UnionOfPrinUpperSets (data : U1_UnionOfPrinUpperSets)
  | U1_Unknown (data : U1_Unknown)

/-- Base fields for U1Map -/
structure U1MapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U1_C_Product where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : U1Map


structure U1_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : U1Map


structure U1_C_CodSumSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_CodSum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_ProdIntersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_DomUnion where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Units for the codomain  -/
  kcod_units : Unit
  /-- Units for the domain  -/
  kdom_units : Unit
  m : U1Map


structure U1_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)


structure U1_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (U1Map)



end -- end mutual
structure U_L_Lift1_Transform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : U1Map
  transform : MonotoneMap


structure U_L_Lift1_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : U1Map
  value : Lean.Json


mutual

inductive UMap : Type
  | U_C_ITransform (data : U_C_ITransform)
  | U_C_Intersection (data : U_C_Intersection)
  | U_C_Parallel (data : U_C_Parallel)
  | U_C_RefineDomain (data : U_C_RefineDomain)
  | U_C_Series (data : U_C_Series)
  | U_C_Trace (data : U_C_Trace)
  | U_C_Union (data : U_C_Union)
  | U_C_WrapUnits (data : U_C_WrapUnits)
  | U_Catalog (data : U_Catalog)
  | U_Constant (data : U_Constant)
  | U_Identity (data : U_Identity)
  | U_L_Lift1_Constant (data : U_L_Lift1_Constant)
  | U_L_Lift1_Transform (data : U_L_Lift1_Transform)
  | U_Unknown (data : U_Unknown)

/-- Base fields for UMap -/
structure UMapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure U_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (UMap)


structure U_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  kcod_units : Unit
  kdom_units : Unit
  kimp_units : Unit
  m : UMap


structure U_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (UMap)


structure U_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : UMap
  m_proj : U1Map


structure U_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (UMap)


structure U_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (UMap)


structure U_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : UMap


structure U_C_ITransform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : UMap
  transform : MonotoneMap



end -- end mutual
structure UCheck where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (UCheck_Data)
  /-- The map to check -/
  m : UMap


structure SU_L_Explicit_Approx where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The optimistic approximations of the SUMap.  -/
  optimistic : List (UMap)
  /-- Labels for the optimistic approximations.  -/
  optimistic_labels : Option (List (String))
  /-- The pessimistic approximations of the SUMap.  -/
  pessimistic : List (UMap)
  /-- Labels for the pessimistic approximations.  -/
  pessimistic_labels : Option (List (String))


structure SU_L_Exact where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The UMap to be lifted to a SUMap.  -/
  m : UMap


structure U1Check where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (U1Check_Data)
  /-- The map to check -/
  m : U1Map


structure SU1_Exact where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The U1Map to be lifted to a SU1Map.  -/
  m : U1Map


structure SU1_C_ExplicitApprox where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The optimistic approximations of the map  -/
  optimistic : List (U1Map)
  /-- Labels for the optimistic approximations.  -/
  optimistic_labels : Option (List (String))
  /-- The pessimistic approximations of the map  -/
  pessimistic : List (U1Map)
  /-- Labels for the pessimistic approximations.  -/
  pessimistic_labels : Option (List (String))


mutual

inductive SU1Map : Type
  | SU1_C_CodSum (data : SU1_C_CodSum)
  | SU1_C_CodSumSmash (data : SU1_C_CodSumSmash)
  | SU1_C_ExplicitApprox (data : SU1_C_ExplicitApprox)
  | SU1_C_Intersection (data : SU1_C_Intersection)
  | SU1_C_Parallel (data : SU1_C_Parallel)
  | SU1_C_ProdIntersection (data : SU1_C_ProdIntersection)
  | SU1_C_Product (data : SU1_C_Product)
  | SU1_C_RefineDomain (data : SU1_C_RefineDomain)
  | SU1_C_Series (data : SU1_C_Series)
  | SU1_C_Trace (data : SU1_C_Trace)
  | SU1_C_Union (data : SU1_C_Union)
  | SU1_C_WrapUnits (data : SU1_C_WrapUnits)
  | SU1_Exact (data : SU1_Exact)
  | SU1_Identity (data : SU1_Identity)
  | SU1_InvMultiply (data : SU1_InvMultiply)
  | SU1_InvSum (data : SU1_InvSum)
  | SU1_Unknown (data : SU1_Unknown)

/-- Base fields for SU1Map -/
structure SU1MapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SU1_C_CodSum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_CodSumSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SU1Map


structure SU1_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_Product where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_ProdIntersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SU1Map


structure SU1_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SU1Map)


structure SU1_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Units for the codomain  -/
  kcod_units : Unit
  /-- Units for the domain  -/
  kdom_units : Unit
  m : SU1Map



end -- end mutual
structure SU_L_Lift1_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The SU1Map to be lifted to a SUMap.  -/
  m : SU1Map
  /-- The constant value to be used for the implementations  -/
  value : Lean.Json


structure SU1Check where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (SU1Check_Data)
  /-- The map to check -/
  m : SU1Map


structure SU_L_Lift1_Transform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The SU1Map to be lifted to a SUMap.  -/
  m : SU1Map
  /-- The monotone map that transforms the implementations of the SUMap.  -/
  transform : MonotoneMap


mutual

inductive SUMap : Type
  | SU_C_ITransform (data : SU_C_ITransform)
  | SU_C_Intersection (data : SU_C_Intersection)
  | SU_C_Parallel (data : SU_C_Parallel)
  | SU_C_RefineDomain (data : SU_C_RefineDomain)
  | SU_C_Series (data : SU_C_Series)
  | SU_C_Trace (data : SU_C_Trace)
  | SU_C_Union (data : SU_C_Union)
  | SU_C_WrapUnits (data : SU_C_WrapUnits)
  | SU_Identity (data : SU_Identity)
  | SU_L_Exact (data : SU_L_Exact)
  | SU_L_Explicit_Approx (data : SU_L_Explicit_Approx)
  | SU_L_Lift1_Constant (data : SU_L_Lift1_Constant)
  | SU_L_Lift1_Transform (data : SU_L_Lift1_Transform)
  | SU_Unknown (data : SU_Unknown)

/-- Base fields for SUMap -/
structure SUMapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SU_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SUMap
  m_proj : SU1Map


structure SU_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps -/
  labels : Option (List (String))
  ms : List (SUMap)


structure SU_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Units for the codomain of the SUMap.  -/
  kcod_units : Unit
  /-- Units for the domain of the SUMap.  -/
  kdom_units : Unit
  /-- Units for the implementations of the SUMap.  -/
  kimp_units : Unit
  m : SUMap


structure SU_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps -/
  labels : Option (List (String))
  ms : List (SUMap)


structure SU_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SUMap


structure SU_C_ITransform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SUMap
  transform : MonotoneMap


structure SU_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps -/
  labels : Option (List (String))
  ms : List (SUMap)


structure SU_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps -/
  labels : Option (List (String))
  ms : List (SUMap)



end -- end mutual
structure SUCheck where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (SUCheck_Data)
  /-- The map to check -/
  m : SUMap


structure MapCheck where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (MapCheck_Data)
  /-- The map to check. -/
  m : MonotoneMap


structure L_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The lower set that is the value of the constant map.  -/
  value : LowerSet


structure L_Catalog where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  options : List (L_Catalog_Options)


structure L1_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_UnionOfPrinLowerSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_TopAlternating where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  upper_bounds : List (List (Lean.Json))


structure L1_RepresentPrincipalLowerSet where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_Lift where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure L1_L_Linv where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure L1_InvSum_Pes where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure L1_InvSum_Opt where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure L1_InvMul_Pes where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure L1_InvMul_Opt where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Resolution (number of points in the produced antichain)  -/
  n : Int
  /-- The poset in which the operation is performed.  -/
  opspace : Poset


structure L1_IntersectionOfPrinLowerSets where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_FromFilter where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure L1_Explicit where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Pairs of input-output -/
  options : List (L1_Explicit_Option)


structure L1_Entire where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  value : LowerSet


structure L1_Catalog where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  options : List (L1_Catalog_Options)


mutual

inductive L1Map : Type
  | L1_C_CodSum (data : L1_C_CodSum)
  | L1_C_CodSumSmash (data : L1_C_CodSumSmash)
  | L1_C_DomUnion (data : L1_C_DomUnion)
  | L1_C_Intersection (data : L1_C_Intersection)
  | L1_C_Parallel (data : L1_C_Parallel)
  | L1_C_ProdIntersection (data : L1_C_ProdIntersection)
  | L1_C_Product (data : L1_C_Product)
  | L1_C_RefineDomain (data : L1_C_RefineDomain)
  | L1_C_Series (data : L1_C_Series)
  | L1_C_Trace (data : L1_C_Trace)
  | L1_C_Union (data : L1_C_Union)
  | L1_C_WrapUnits (data : L1_C_WrapUnits)
  | L1_Catalog (data : L1_Catalog)
  | L1_Constant (data : L1_Constant)
  | L1_Entire (data : L1_Entire)
  | L1_Explicit (data : L1_Explicit)
  | L1_FromFilter (data : L1_FromFilter)
  | L1_Identity (data : L1_Identity)
  | L1_IntersectionOfPrinLowerSets (data : L1_IntersectionOfPrinLowerSets)
  | L1_InvMul_Opt (data : L1_InvMul_Opt)
  | L1_InvMul_Pes (data : L1_InvMul_Pes)
  | L1_InvSum_Opt (data : L1_InvSum_Opt)
  | L1_InvSum_Pes (data : L1_InvSum_Pes)
  | L1_L_Linv (data : L1_L_Linv)
  | L1_Lift (data : L1_Lift)
  | L1_RepresentPrincipalLowerSet (data : L1_RepresentPrincipalLowerSet)
  | L1_TopAlternating (data : L1_TopAlternating)
  | L1_UnionOfPrinLowerSets (data : L1_UnionOfPrinLowerSets)
  | L1_Unknown (data : L1_Unknown)

/-- Base fields for L1Map -/
structure L1MapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L1_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The units for the codomain -/
  kcod_units : Unit
  /-- The units for the domain -/
  kdom_units : Unit
  m : L1Map


structure L1_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : L1Map


structure L1_C_CodSum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_Product where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_DomUnion where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_CodSumSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_ProdIntersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps  -/
  labels : Option (List (String))
  ms : List (L1Map)


structure L1_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : L1Map



end -- end mutual
structure SL1_Exact where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The L1Map to lift.  -/
  m : L1Map


structure SL1_C_ExplicitApprox where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The optimistic approximations of the L1Map.  -/
  optimistic : List (L1Map)
  /-- Labels for the optimistic approximations.  -/
  optimistic_labels : Option (List (String))
  /-- The pessimistic approximations of the L1Map.  -/
  pessimistic : List (L1Map)
  /-- Labels for the pessimistic approximations.  -/
  pessimistic_labels : Option (List (String))


mutual

inductive SL1Map : Type
  | SL1_C_CodSum (data : SL1_C_CodSum)
  | SL1_C_CodSumSmash (data : SL1_C_CodSumSmash)
  | SL1_C_ExplicitApprox (data : SL1_C_ExplicitApprox)
  | SL1_C_Intersection (data : SL1_C_Intersection)
  | SL1_C_Parallel (data : SL1_C_Parallel)
  | SL1_C_ProdIntersection (data : SL1_C_ProdIntersection)
  | SL1_C_Product (data : SL1_C_Product)
  | SL1_C_RefineDomain (data : SL1_C_RefineDomain)
  | SL1_C_Series (data : SL1_C_Series)
  | SL1_C_Trace (data : SL1_C_Trace)
  | SL1_C_Union (data : SL1_C_Union)
  | SL1_C_WrapUnits (data : SL1_C_WrapUnits)
  | SL1_Exact (data : SL1_Exact)
  | SL1_Identity (data : SL1_Identity)
  | SL1_InvMultiply (data : SL1_InvMultiply)
  | SL1_InvSum (data : SL1_InvSum)
  | SL1_Unknown (data : SL1_Unknown)

/-- Base fields for SL1Map -/
structure SL1MapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SL1_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SL1Map


structure SL1_C_CodSumSmash where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_CodSum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_ProdIntersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SL1Map


structure SL1_C_Product where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The units for the codomain.  -/
  kcod_units : Unit
  /-- The units for the domain.  -/
  kdom_units : Unit
  m : SL1Map


structure SL1_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)


structure SL1_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  opt : Poset
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  ms : List (SL1Map)



end -- end mutual
structure SL_L_Lift1_Transform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The SL1Map to be lifted to a SLMap.  -/
  m : SL1Map
  /-- The monotone map that transforms the implementations of the SLMap.  -/
  transform : MonotoneMap


structure SL_L_Lift1_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The SL1Map to be lifted to a SLMap.  -/
  m : SL1Map
  /-- The constant value to be used for the implementations  -/
  value : Lean.Json


structure SL1Check where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (SL1Check_Data)
  /-- The map to check -/
  m : SL1Map


structure L_L_Lift1_Transform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : L1Map
  transform : MonotoneMap


structure L_L_Lift1_Constant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : L1Map
  value : Lean.Json


mutual

inductive LMap : Type
  | L_C_ITransform (data : L_C_ITransform)
  | L_C_Intersection (data : L_C_Intersection)
  | L_C_Parallel (data : L_C_Parallel)
  | L_C_RefineDomain (data : L_C_RefineDomain)
  | L_C_Series (data : L_C_Series)
  | L_C_Trace (data : L_C_Trace)
  | L_C_Union (data : L_C_Union)
  | L_C_WrapUnits (data : L_C_WrapUnits)
  | L_Catalog (data : L_Catalog)
  | L_Constant (data : L_Constant)
  | L_Identity (data : L_Identity)
  | L_L_Lift1_Constant (data : L_L_Lift1_Constant)
  | L_L_Lift1_Transform (data : L_L_Lift1_Transform)
  | L_Unknown (data : L_Unknown)

/-- Base fields for LMap -/
structure LMapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure L_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (LMap)


structure L_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (LMap)


structure L_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (LMap)


structure L_C_ITransform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : LMap
  transform : MonotoneMap


structure L_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : LMap
  m_proj : L1Map


structure L_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  kcod_units : Unit
  kdom_units : Unit
  kimp_units : Unit
  m : LMap


structure L_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed.  -/
  ms : List (LMap)


structure L_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  kcod : Poset
  kdom : Poset
  kimp : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : LMap



end -- end mutual
structure SL_L_Explicit_Approx where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The optimistic approximations of the SLMap.  -/
  optimistic : List (LMap)
  /-- Labels for the optimistic approximations.  -/
  optimistic_labels : Option (List (String))
  /-- The pessimistic approximations of the SLMap.  -/
  pessimistic : List (LMap)
  /-- Labels for the pessimistic approximations.  -/
  pessimistic_labels : Option (List (String))


structure SL_L_Exact where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The LMap to be lifted to a SLMap.  -/
  m : LMap


mutual

inductive SLMap : Type
  | SL_C_ITransform (data : SL_C_ITransform)
  | SL_C_Intersection (data : SL_C_Intersection)
  | SL_C_Parallel (data : SL_C_Parallel)
  | SL_C_RefineDomain (data : SL_C_RefineDomain)
  | SL_C_Series (data : SL_C_Series)
  | SL_C_Trace (data : SL_C_Trace)
  | SL_C_Union (data : SL_C_Union)
  | SL_C_WrapUnits (data : SL_C_WrapUnits)
  | SL_Identity (data : SL_Identity)
  | SL_L_Exact (data : SL_L_Exact)
  | SL_L_Explicit_Approx (data : SL_L_Explicit_Approx)
  | SL_L_Lift1_Constant (data : SL_L_Lift1_Constant)
  | SL_L_Lift1_Transform (data : SL_L_Lift1_Transform)
  | SL_Unknown (data : SL_Unknown)

/-- Base fields for SLMap -/
structure SLMapFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure SL_C_RefineDomain where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SLMap


structure SL_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SLMap
  m_proj : SL1Map


structure SL_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed. -/
  ms : List (SLMap)


structure SL_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed. -/
  ms : List (SLMap)


structure SL_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed. -/
  ms : List (SLMap)


structure SL_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of labels for the maps.  -/
  labels : Option (List (String))
  /-- Maps to be composed. -/
  ms : List (SLMap)


structure SL_C_ITransform where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : SLMap
  transform : MonotoneMap


structure SL_C_WrapUnits where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Kleisli co-domain of the map. -/
  kcod : Poset
  /-- Kleisli domain of the map. -/
  kdom : Poset
  /-- Poset of implementations. -/
  kimp : Poset
  /-- Poset of resolutions (optimistic) -/
  opt : Poset
  /-- Poset of resolutions (pessimistic) -/
  pes : Poset
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Units for the codomain of the SLMap.  -/
  kcod_units : Unit
  /-- Units for the domain of the SLMap.  -/
  kdom_units : Unit
  /-- Units for the implementations of the SLMap.  -/
  kimp_units : Unit
  m : SLMap



end -- end mutual
structure SLCheck where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (SLCheck_Data)
  /-- The map to check -/
  m : SLMap


structure LCheck where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Test pairs -/
  data : List (LCheck_Data)
  /-- The map to check -/
  m : LMap


structure L1Check where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Data to check the L1Map. -/
  data : List (L1Check_Data)
  /-- The map to check -/
  m : L1Map


inductive Check : Type
  | L1Check (data : L1Check)
  | LCheck (data : LCheck)
  | MapCheck (data : MapCheck)
  | SL1Check (data : SL1Check)
  | SLCheck (data : SLCheck)
  | SU1Check (data : SU1Check)
  | SUCheck (data : SUCheck)
  | U1Check (data : U1Check)
  | UCheck (data : UCheck)

/-- Base fields for Check -/
structure CheckFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure NDP_TemplateHole where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  C : Poset
  /-- Dictionary of functionalities.  -/
  F : List (String × Poset)
  J : Poset
  /-- Dictionary of resources.  -/
  R : List (String × Poset)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The name of the parameter that is to be filled in.  -/
  parameter_name : String


structure NDPInterface_Explicit where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Dictionary from functionality name to poset. -/
  fs : List (String × Poset)
  /-- Dictionary from requirement name to poset. -/
  rs : List (String × Poset)


inductive NDPInterface : Type
  | NDPInterface_Explicit (data : NDPInterface_Explicit)

/-- Base fields for NDPInterface -/
structure NDPInterfaceFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_Unknown where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_True where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The implementation value.  -/
  value : Value


structure DP_ResNotLessThan where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  limit : Lean.Json


structure DP_LiftU where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A monotone map from the poset of functionalities to the poset of requirements.  -/
  m : MonotoneMap


structure DP_LiftL where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  m : MonotoneMap


structure DP_Iso where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  bwd : MonotoneMap
  fwd : MonotoneMap


structure DP_Identity where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_GenericConstant where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  b_value : Lean.Json
  lower_set : LowerSet
  upper_set : UpperSet


structure DP_FuncNotMoreThan where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  limit : Lean.Json


structure DP_False where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_F_Leq_Any_Ri where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_F_Leq_Any_R_And_Constants where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of constants c₁, ..., c_n.  -/
  constants : List (Lean.Json)


structure DP_F_Leq_All_Ri where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_F_Leq_All_R_And_Constants where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of constants c₁, ..., c_n.  -/
  constants : List (Lean.Json)


structure DP_F_Leq_All_Constants where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of constants c₁, ..., c_n.  -/
  constants : List (Lean.Json)


structure DP_Compiled where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The function that returns the maximum functionality given the budget of resources as well as the blueprint. -/
  f_b_r : SUMap
  /-- The function that returns the maximum functionality given the budget of resources as well as the implementation. -/
  f_i_r : SUMap
  /-- The function that returns minimal resources needed to satisfy the requirements. -/
  f_r : SU1Map
  /-- The function that maps implementations to their availability.  -/
  i_availability : MonotoneMap
  /-- The function that maps implementations to blueprints. -/
  i_b : MonotoneMap
  /-- The function that maps implementations to their internal feasibility. -/
  i_codfeas : MonotoneMap
  /-- The "provides" map from implementations to functionalities.  -/
  prov : MonotoneMap
  /-- The function that returns the maximum functionality given the budget of resources as well as the blueprint. -/
  r_b_f : SLMap
  /-- The function that returns the maximum functionality given the budget of requirements. -/
  r_f : SL1Map
  /-- The function that returns the maximum functionality given the budget of resources as well as the implementation. -/
  r_i_f : SLMap
  /-- The "requires" map from implementations to requirements.  -/
  req : MonotoneMap


structure DP_Catalog where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of options that define the design problem. Each option is a tuple of functionality, requirement, blueprint, and implementation.  -/
  options : List (DP_Catalog_Options)


structure DP_Any_Fi_Leq_R where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_Any_Constants_Or_F_Leq_R where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of constants c₁, ..., c_n.  -/
  constants : List (Lean.Json)


structure DP_AmbientConversion where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  common : Poset


structure DP_All_Fi_Leq_R where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_All_Constants_Leq_R where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of constants c₁, ..., c_n.  -/
  constants : List (Lean.Json)


structure DP_All_Constants_And_F_Leq_R where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of constants c₁, ..., c_n.  -/
  constants : List (Lean.Json)


mutual

inductive DP : Type
  | DP_All_Constants_And_F_Leq_R (data : DP_All_Constants_And_F_Leq_R)
  | DP_All_Constants_Leq_R (data : DP_All_Constants_Leq_R)
  | DP_All_Fi_Leq_R (data : DP_All_Fi_Leq_R)
  | DP_AmbientConversion (data : DP_AmbientConversion)
  | DP_Any_Constants_Or_F_Leq_R (data : DP_Any_Constants_Or_F_Leq_R)
  | DP_Any_Fi_Leq_R (data : DP_Any_Fi_Leq_R)
  | DP_C_ExplicitApprox (data : DP_C_ExplicitApprox)
  | DP_C_Intersection (data : DP_C_Intersection)
  | DP_C_Parallel (data : DP_C_Parallel)
  | DP_C_Series (data : DP_C_Series)
  | DP_C_Trace (data : DP_C_Trace)
  | DP_C_Union (data : DP_C_Union)
  | DP_Catalog (data : DP_Catalog)
  | DP_Compiled (data : DP_Compiled)
  | DP_F_Leq_All_Constants (data : DP_F_Leq_All_Constants)
  | DP_F_Leq_All_R_And_Constants (data : DP_F_Leq_All_R_And_Constants)
  | DP_F_Leq_All_Ri (data : DP_F_Leq_All_Ri)
  | DP_F_Leq_Any_R_And_Constants (data : DP_F_Leq_Any_R_And_Constants)
  | DP_F_Leq_Any_Ri (data : DP_F_Leq_Any_Ri)
  | DP_False (data : DP_False)
  | DP_FuncNotMoreThan (data : DP_FuncNotMoreThan)
  | DP_GenericConstant (data : DP_GenericConstant)
  | DP_Identity (data : DP_Identity)
  | DP_Iso (data : DP_Iso)
  | DP_LiftL (data : DP_LiftL)
  | DP_LiftU (data : DP_LiftU)
  | DP_ResNotLessThan (data : DP_ResNotLessThan)
  | DP_True (data : DP_True)
  | DP_Unknown (data : DP_Unknown)

/-- Base fields for DP -/
structure DPFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure DP_C_Parallel where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of design problems (DPs) to be composed. -/
  dps : List (DP)
  /-- A list of labels.  -/
  labels : Option (List (String))


structure DP_C_ExplicitApprox where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- List of optimistic DPs.  -/
  optimistic : List (DP)
  /-- Labels for the optimistic DPs.  -/
  optimistic_labels : Option (List (String))
  /-- List of pessimistic DPs.  -/
  pessimistic : List (DP)
  /-- Labels for the pessimistic DPs.  -/
  pessimistic_labels : Option (List (String))


structure DP_C_Series where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of design problems (DPs) to be composed. -/
  dps : List (DP)
  /-- A list of labels.  -/
  labels : Option (List (String))


structure DP_C_Trace where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The design problem that is being traced.  -/
  dp : DP


structure DP_C_Union where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of design problems (DPs) to be composed. -/
  dps : List (DP)
  /-- A list of labels.  -/
  labels : Option (List (String))


structure DP_C_Intersection where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Poset of blueprints. If not present, it is the smash unit. -/
  B : Option (Poset)
  /-- Poset of functionalities -/
  F : Poset
  /-- Poset of implementations. If not present, it is the smash unit. -/
  I : Option (Poset)
  /-- Poset of requirements -/
  R : Poset
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- A list of design problems (DPs) to be composed. -/
  dps : List (DP)
  /-- A list of labels.  -/
  labels : Option (List (String))



end -- end mutual
structure NDP_Simple where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  C : Poset
  /-- Dictionary of functionalities.  -/
  F : List (String × Poset)
  J : Poset
  /-- Dictionary of resources.  -/
  R : List (String × Poset)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The DP that this NDP contains. Must have poset products as resources and functionalities. -/
  dp : DP


mutual

inductive NDP : Type
  | NDP_Composite (data : NDP_Composite)
  | NDP_Simple (data : NDP_Simple)
  | NDP_Sum (data : NDP_Sum)
  | NDP_TemplateHole (data : NDP_TemplateHole)

/-- Base fields for NDP -/
structure NDPFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  C : Poset
  /-- Dictionary of functionalities.  -/
  F : List (String × Poset)
  J : Poset
  /-- Dictionary of resources.  -/
  R : List (String × Poset)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure NDP_Composite where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  C : Poset
  /-- Dictionary of functionalities.  -/
  F : List (String × Poset)
  J : Poset
  /-- Dictionary of resources.  -/
  R : List (String × Poset)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- Connections between the nodes in the NDP graph.  -/
  connections : List (Connection)
  /-- A map of node identifiers to their corresponding NDPs in the graph. Each key is a unique identifier for a node, and the value is the NDP associated with that node.  -/
  nodes : List (String × NDP)


structure NDP_Sum where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  C : Poset
  /-- Dictionary of functionalities.  -/
  F : List (String × Poset)
  J : Poset
  /-- Dictionary of resources.  -/
  R : List (String × Poset)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  /-- The NDPs to sum.  -/
  dps : List (String × NDP)
  /-- Labels for the NDPs.  -/
  labels : Option (List (String))



end -- end mutual
structure Query_Single where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  model : NDP
  query_data : QueryData


inductive Query : Type
  | Query_Single (data : Query_Single)

/-- Base fields for Query -/
structure QueryFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


structure NDPTemplate_Simple where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String
  ndp : NDP
  /-- The interface of the holes.  -/
  parameters : List (String × NDPInterface)


inductive NDPTemplate : Type
  | NDPTemplate_Simple (data : NDPTemplate_Simple)

/-- Base fields for NDPTemplate -/
structure NDPTemplateFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)
  /-- Pointer to the entity that generated this object. -/
  address : Option (Address)
  /-- Discriminator variable to distinguish subtypes. -/
  type : String


/-- The Root schema contains as subtypes all kinds of objects that can serialized in a MCDP file during an export operation. -/
inductive Root : Type
  | Check (data : Check)
  | DP (data : DP)
  | L1Map (data : L1Map)
  | LMap (data : LMap)
  | MonotoneMap (data : MonotoneMap)
  | NDP (data : NDP)
  | NDPInterface (data : NDPInterface)
  | NDPTemplate (data : NDPTemplate)
  | Poset (data : Poset)
  | Query (data : Query)
  | SL1Map (data : SL1Map)
  | SLMap (data : SLMap)
  | SU1Map (data : SU1Map)
  | SUMap (data : SUMap)
  | U1Map (data : U1Map)
  | UMap (data : UMap)
  | Value (data : Value)

/-- Base fields for Root -/
structure RootFields where
  /-- A human-readable description of the object used for debug purposes. -/
  description : Option (String)
  /-- Unique hash for the object. -/
  hash : Option (String)
  /-- Discriminator variable to distinguish subtypes. -/
  kind : String
  /-- Version of the MCDP format used to serialize this object (major.minor). -/
  version : Option (String)



/-- Extract Root fields from Check -/
def CheckFields.toRoot (x : CheckFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract Root fields from DP -/
def DPFields.toRoot (x : DPFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract DP fields from DP_All_Constants_And_F_Leq_R -/
def DP_All_Constants_And_F_Leq_R.toDP (x : DP_All_Constants_And_F_Leq_R) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_All_Constants_Leq_R -/
def DP_All_Constants_Leq_R.toDP (x : DP_All_Constants_Leq_R) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_All_Fi_Leq_R -/
def DP_All_Fi_Leq_R.toDP (x : DP_All_Fi_Leq_R) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_AmbientConversion -/
def DP_AmbientConversion.toDP (x : DP_AmbientConversion) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Any_Constants_Or_F_Leq_R -/
def DP_Any_Constants_Or_F_Leq_R.toDP (x : DP_Any_Constants_Or_F_Leq_R) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Any_Fi_Leq_R -/
def DP_Any_Fi_Leq_R.toDP (x : DP_Any_Fi_Leq_R) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_C_ExplicitApprox -/
def DP_C_ExplicitApprox.toDP (x : DP_C_ExplicitApprox) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_C_Intersection -/
def DP_C_Intersection.toDP (x : DP_C_Intersection) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_C_Parallel -/
def DP_C_Parallel.toDP (x : DP_C_Parallel) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_C_Series -/
def DP_C_Series.toDP (x : DP_C_Series) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_C_Trace -/
def DP_C_Trace.toDP (x : DP_C_Trace) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_C_Union -/
def DP_C_Union.toDP (x : DP_C_Union) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Catalog -/
def DP_Catalog.toDP (x : DP_Catalog) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Compiled -/
def DP_Compiled.toDP (x : DP_Compiled) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_F_Leq_All_Constants -/
def DP_F_Leq_All_Constants.toDP (x : DP_F_Leq_All_Constants) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_F_Leq_All_R_And_Constants -/
def DP_F_Leq_All_R_And_Constants.toDP (x : DP_F_Leq_All_R_And_Constants) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_F_Leq_All_Ri -/
def DP_F_Leq_All_Ri.toDP (x : DP_F_Leq_All_Ri) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_F_Leq_Any_R_And_Constants -/
def DP_F_Leq_Any_R_And_Constants.toDP (x : DP_F_Leq_Any_R_And_Constants) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_F_Leq_Any_Ri -/
def DP_F_Leq_Any_Ri.toDP (x : DP_F_Leq_Any_Ri) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_False -/
def DP_False.toDP (x : DP_False) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_FuncNotMoreThan -/
def DP_FuncNotMoreThan.toDP (x : DP_FuncNotMoreThan) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_GenericConstant -/
def DP_GenericConstant.toDP (x : DP_GenericConstant) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Identity -/
def DP_Identity.toDP (x : DP_Identity) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Iso -/
def DP_Iso.toDP (x : DP_Iso) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_LiftL -/
def DP_LiftL.toDP (x : DP_LiftL) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_LiftU -/
def DP_LiftU.toDP (x : DP_LiftU) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_ResNotLessThan -/
def DP_ResNotLessThan.toDP (x : DP_ResNotLessThan) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_True -/
def DP_True.toDP (x : DP_True) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract DP fields from DP_Unknown -/
def DP_Unknown.toDP (x : DP_Unknown) : DPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    B := x.B,
    F := x.F,
    I := x.I,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract Check fields from L1Check -/
def L1Check.toCheck (x : L1Check) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from L1Map -/
def L1MapFields.toRoot (x : L1MapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract L1Map fields from L1_C_CodSum -/
def L1_C_CodSum.toL1Map (x : L1_C_CodSum) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_CodSumSmash -/
def L1_C_CodSumSmash.toL1Map (x : L1_C_CodSumSmash) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_DomUnion -/
def L1_C_DomUnion.toL1Map (x : L1_C_DomUnion) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_Intersection -/
def L1_C_Intersection.toL1Map (x : L1_C_Intersection) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_Parallel -/
def L1_C_Parallel.toL1Map (x : L1_C_Parallel) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_ProdIntersection -/
def L1_C_ProdIntersection.toL1Map (x : L1_C_ProdIntersection) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_Product -/
def L1_C_Product.toL1Map (x : L1_C_Product) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_RefineDomain -/
def L1_C_RefineDomain.toL1Map (x : L1_C_RefineDomain) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_Series -/
def L1_C_Series.toL1Map (x : L1_C_Series) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_Trace -/
def L1_C_Trace.toL1Map (x : L1_C_Trace) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_Union -/
def L1_C_Union.toL1Map (x : L1_C_Union) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_C_WrapUnits -/
def L1_C_WrapUnits.toL1Map (x : L1_C_WrapUnits) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Catalog -/
def L1_Catalog.toL1Map (x : L1_Catalog) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Constant -/
def L1_Constant.toL1Map (x : L1_Constant) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Entire -/
def L1_Entire.toL1Map (x : L1_Entire) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Explicit -/
def L1_Explicit.toL1Map (x : L1_Explicit) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_FromFilter -/
def L1_FromFilter.toL1Map (x : L1_FromFilter) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Identity -/
def L1_Identity.toL1Map (x : L1_Identity) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_IntersectionOfPrinLowerSets -/
def L1_IntersectionOfPrinLowerSets.toL1Map (x : L1_IntersectionOfPrinLowerSets) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_InvMul_Opt -/
def L1_InvMul_Opt.toL1Map (x : L1_InvMul_Opt) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_InvMul_Pes -/
def L1_InvMul_Pes.toL1Map (x : L1_InvMul_Pes) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_InvSum_Opt -/
def L1_InvSum_Opt.toL1Map (x : L1_InvSum_Opt) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_InvSum_Pes -/
def L1_InvSum_Pes.toL1Map (x : L1_InvSum_Pes) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_L_Linv -/
def L1_L_Linv.toL1Map (x : L1_L_Linv) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Lift -/
def L1_Lift.toL1Map (x : L1_Lift) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_RepresentPrincipalLowerSet -/
def L1_RepresentPrincipalLowerSet.toL1Map (x : L1_RepresentPrincipalLowerSet) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_TopAlternating -/
def L1_TopAlternating.toL1Map (x : L1_TopAlternating) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_UnionOfPrinLowerSets -/
def L1_UnionOfPrinLowerSets.toL1Map (x : L1_UnionOfPrinLowerSets) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract L1Map fields from L1_Unknown -/
def L1_Unknown.toL1Map (x : L1_Unknown) : L1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract Check fields from LCheck -/
def LCheck.toCheck (x : LCheck) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from LMap -/
def LMapFields.toRoot (x : LMapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract LMap fields from L_C_ITransform -/
def L_C_ITransform.toLMap (x : L_C_ITransform) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_Intersection -/
def L_C_Intersection.toLMap (x : L_C_Intersection) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_Parallel -/
def L_C_Parallel.toLMap (x : L_C_Parallel) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_RefineDomain -/
def L_C_RefineDomain.toLMap (x : L_C_RefineDomain) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_Series -/
def L_C_Series.toLMap (x : L_C_Series) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_Trace -/
def L_C_Trace.toLMap (x : L_C_Trace) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_Union -/
def L_C_Union.toLMap (x : L_C_Union) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_C_WrapUnits -/
def L_C_WrapUnits.toLMap (x : L_C_WrapUnits) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_Catalog -/
def L_Catalog.toLMap (x : L_Catalog) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_Constant -/
def L_Constant.toLMap (x : L_Constant) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_Identity -/
def L_Identity.toLMap (x : L_Identity) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_L_Lift1_Constant -/
def L_L_Lift1_Constant.toLMap (x : L_L_Lift1_Constant) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_L_Lift1_Transform -/
def L_L_Lift1_Transform.toLMap (x : L_L_Lift1_Transform) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LMap fields from L_Unknown -/
def L_Unknown.toLMap (x : L_Unknown) : LMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract LowerSet fields from LowerSet_LowerClosure -/
def LowerSet_LowerClosure.toLowerSet (x : LowerSet_LowerClosure) : LowerSetFields :=
  {
    kind := x.kind,
    type := x.type
  }

/-- Extract LowerSet fields from LowerSet_Unused -/
def LowerSet_Unused.toLowerSet (x : LowerSet_Unused) : LowerSetFields :=
  {
    kind := x.kind,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_AddL -/
def M_AddL.toMonotoneMap (x : M_AddL) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_AddLConstant -/
def M_AddLConstant.toMonotoneMap (x : M_AddLConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_AddU -/
def M_AddU.toMonotoneMap (x : M_AddU) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_AddUConstant -/
def M_AddUConstant.toMonotoneMap (x : M_AddUConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_BottomIfNotTop -/
def M_BottomIfNotTop.toMonotoneMap (x : M_BottomIfNotTop) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Coproduct -/
def M_C_Coproduct.toMonotoneMap (x : M_C_Coproduct) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_CoproductSmash -/
def M_C_CoproductSmash.toMonotoneMap (x : M_C_CoproductSmash) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_DomProdCodSmash -/
def M_C_DomProdCodSmash.toMonotoneMap (x : M_C_DomProdCodSmash) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_DomSmashCodProd -/
def M_C_DomSmashCodProd.toMonotoneMap (x : M_C_DomSmashCodProd) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_DomUnion -/
def M_C_DomUnion.toMonotoneMap (x : M_C_DomUnion) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Leq_X -/
def M_C_Leq_X.toMonotoneMap (x : M_C_Leq_X) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_LiftToSubsets -/
def M_C_LiftToSubsets.toMonotoneMap (x : M_C_LiftToSubsets) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Lt_X -/
def M_C_Lt_X.toMonotoneMap (x : M_C_Lt_X) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Op -/
def M_C_Op.toMonotoneMap (x : M_C_Op) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Parallel -/
def M_C_Parallel.toMonotoneMap (x : M_C_Parallel) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_ParallelSmash -/
def M_C_ParallelSmash.toMonotoneMap (x : M_C_ParallelSmash) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Product -/
def M_C_Product.toMonotoneMap (x : M_C_Product) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_ProductSmash -/
def M_C_ProductSmash.toMonotoneMap (x : M_C_ProductSmash) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_RefineDomain -/
def M_C_RefineDomain.toMonotoneMap (x : M_C_RefineDomain) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Series -/
def M_C_Series.toMonotoneMap (x : M_C_Series) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_Sum -/
def M_C_Sum.toMonotoneMap (x : M_C_Sum) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_SumSmash -/
def M_C_SumSmash.toMonotoneMap (x : M_C_SumSmash) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_C_WrapUnits -/
def M_C_WrapUnits.toMonotoneMap (x : M_C_WrapUnits) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Ceil0 -/
def M_Ceil0.toMonotoneMap (x : M_Ceil0) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Coerce -/
def M_Coerce.toMonotoneMap (x : M_Coerce) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Constant -/
def M_Constant.toMonotoneMap (x : M_Constant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_ContainedInLowerSet -/
def M_ContainedInLowerSet.toMonotoneMap (x : M_ContainedInLowerSet) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_ContainedInUpperSet -/
def M_ContainedInUpperSet.toMonotoneMap (x : M_ContainedInUpperSet) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_DivideLConstant -/
def M_DivideLConstant.toMonotoneMap (x : M_DivideLConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_DivideUConstant -/
def M_DivideUConstant.toMonotoneMap (x : M_DivideUConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Empty -/
def M_Empty.toMonotoneMap (x : M_Empty) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Explicit -/
def M_Explicit.toMonotoneMap (x : M_Explicit) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Floor0 -/
def M_Floor0.toMonotoneMap (x : M_Floor0) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Id -/
def M_Id.toMonotoneMap (x : M_Id) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_IdentityBelowThreshold -/
def M_IdentityBelowThreshold.toMonotoneMap (x : M_IdentityBelowThreshold) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Injection -/
def M_Injection.toMonotoneMap (x : M_Injection) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Join -/
def M_Join.toMonotoneMap (x : M_Join) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_JoinConstant -/
def M_JoinConstant.toMonotoneMap (x : M_JoinConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Leq -/
def M_Leq.toMonotoneMap (x : M_Leq) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Lift -/
def M_Lift.toMonotoneMap (x : M_Lift) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_LiftToLowerSets -/
def M_LiftToLowerSets.toMonotoneMap (x : M_LiftToLowerSets) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_LiftToUpperSets -/
def M_LiftToUpperSets.toMonotoneMap (x : M_LiftToUpperSets) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Meet -/
def M_Meet.toMonotoneMap (x : M_Meet) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_MeetConstant -/
def M_MeetConstant.toMonotoneMap (x : M_MeetConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_MultiplyL -/
def M_MultiplyL.toMonotoneMap (x : M_MultiplyL) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_MultiplyLConstant -/
def M_MultiplyLConstant.toMonotoneMap (x : M_MultiplyLConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_MultiplyU -/
def M_MultiplyU.toMonotoneMap (x : M_MultiplyU) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_MultiplyUConstant -/
def M_MultiplyUConstant.toMonotoneMap (x : M_MultiplyUConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_PowerFracL -/
def M_PowerFracL.toMonotoneMap (x : M_PowerFracL) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_PowerFracU -/
def M_PowerFracU.toMonotoneMap (x : M_PowerFracU) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_ReprLowerSet -/
def M_ReprLowerSet.toMonotoneMap (x : M_ReprLowerSet) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_ReprUpperSet -/
def M_ReprUpperSet.toMonotoneMap (x : M_ReprUpperSet) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_RepresentPrincipalLowerSet_TotalOrderBounded -/
def M_RepresentPrincipalLowerSet_TotalOrderBounded.toMonotoneMap (x : M_RepresentPrincipalLowerSet_TotalOrderBounded) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_RepresentPrincipalUpperSet_TotalOrderBounded -/
def M_RepresentPrincipalUpperSet_TotalOrderBounded.toMonotoneMap (x : M_RepresentPrincipalUpperSet_TotalOrderBounded) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_RoundDown -/
def M_RoundDown.toMonotoneMap (x : M_RoundDown) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_RoundUp -/
def M_RoundUp.toMonotoneMap (x : M_RoundUp) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_ScaleL -/
def M_ScaleL.toMonotoneMap (x : M_ScaleL) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_ScaleU -/
def M_ScaleU.toMonotoneMap (x : M_ScaleU) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_SmashInjection -/
def M_SmashInjection.toMonotoneMap (x : M_SmashInjection) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_SubLConstant -/
def M_SubLConstant.toMonotoneMap (x : M_SubLConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_SubUConstant -/
def M_SubUConstant.toMonotoneMap (x : M_SubUConstant) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_TakeIndex -/
def M_TakeIndex.toMonotoneMap (x : M_TakeIndex) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_TakeRange -/
def M_TakeRange.toMonotoneMap (x : M_TakeRange) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Threshold1 -/
def M_Threshold1.toMonotoneMap (x : M_Threshold1) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Threshold2 -/
def M_Threshold2.toMonotoneMap (x : M_Threshold2) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_TopIfNotBottom -/
def M_TopIfNotBottom.toMonotoneMap (x : M_TopIfNotBottom) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Undefined -/
def M_Undefined.toMonotoneMap (x : M_Undefined) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Unknown -/
def M_Unknown.toMonotoneMap (x : M_Unknown) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_Unlift -/
def M_Unlift.toMonotoneMap (x : M_Unlift) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_X_Leq_C -/
def M_X_Leq_C.toMonotoneMap (x : M_X_Leq_C) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract MonotoneMap fields from M_X_Lt_C -/
def M_X_Lt_C.toMonotoneMap (x : M_X_Lt_C) : MonotoneMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    cod := x.cod,
    dom := x.dom,
    type := x.type
  }

/-- Extract Check fields from MapCheck -/
def MapCheck.toCheck (x : MapCheck) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract ConnectionSource fields from ModelFunctionality -/
def ModelFunctionality.toConnectionSource (x : ModelFunctionality) : ConnectionSourceFields :=
  {
    type := x.type
  }

/-- Extract ConnectionTarget fields from ModelRequirement -/
def ModelRequirement.toConnectionTarget (x : ModelRequirement) : ConnectionTargetFields :=
  {
    type := x.type
  }

/-- Extract Root fields from MonotoneMap -/
def MonotoneMapFields.toRoot (x : MonotoneMapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract Root fields from NDP -/
def NDPFields.toRoot (x : NDPFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract Root fields from NDPInterface -/
def NDPInterfaceFields.toRoot (x : NDPInterfaceFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract NDPInterface fields from NDPInterface_Explicit -/
def NDPInterface_Explicit.toNDPInterface (x : NDPInterface_Explicit) : NDPInterfaceFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Root fields from NDPTemplate -/
def NDPTemplateFields.toRoot (x : NDPTemplateFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract NDPTemplate fields from NDPTemplate_Simple -/
def NDPTemplate_Simple.toNDPTemplate (x : NDPTemplate_Simple) : NDPTemplateFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract NDP fields from NDP_Composite -/
def NDP_Composite.toNDP (x : NDP_Composite) : NDPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    C := x.C,
    F := x.F,
    J := x.J,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract NDP fields from NDP_Simple -/
def NDP_Simple.toNDP (x : NDP_Simple) : NDPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    C := x.C,
    F := x.F,
    J := x.J,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract NDP fields from NDP_Sum -/
def NDP_Sum.toNDP (x : NDP_Sum) : NDPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    C := x.C,
    F := x.F,
    J := x.J,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract NDP fields from NDP_TemplateHole -/
def NDP_TemplateHole.toNDP (x : NDP_TemplateHole) : NDPFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    C := x.C,
    F := x.F,
    J := x.J,
    R := x.R,
    address := x.address,
    type := x.type
  }

/-- Extract ConnectionTarget fields from NodeFunctionality -/
def NodeFunctionality.toConnectionTarget (x : NodeFunctionality) : ConnectionTargetFields :=
  {
    type := x.type
  }

/-- Extract ConnectionSource fields from NodeRequirement -/
def NodeRequirement.toConnectionSource (x : NodeRequirement) : ConnectionSourceFields :=
  {
    type := x.type
  }

/-- Extract Poset fields from P_Bool -/
def P_Bool.toPoset (x : P_Bool) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Arrow -/
def P_C_Arrow.toPoset (x : P_C_Arrow) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Discretized -/
def P_C_Discretized.toPoset (x : P_C_Discretized) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Lexicographic -/
def P_C_Lexicographic.toPoset (x : P_C_Lexicographic) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_LowerSets -/
def P_C_LowerSets.toPoset (x : P_C_LowerSets) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Multisets -/
def P_C_Multisets.toPoset (x : P_C_Multisets) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Opposite -/
def P_C_Opposite.toPoset (x : P_C_Opposite) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Power -/
def P_C_Power.toPoset (x : P_C_Power) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Product -/
def P_C_Product.toPoset (x : P_C_Product) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_ProductDS -/
def P_C_ProductDS.toPoset (x : P_C_ProductDS) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_ProductSmash -/
def P_C_ProductSmash.toPoset (x : P_C_ProductSmash) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Sum -/
def P_C_Sum.toPoset (x : P_C_Sum) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_SumSmash -/
def P_C_SumSmash.toPoset (x : P_C_SumSmash) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Twisted -/
def P_C_Twisted.toPoset (x : P_C_Twisted) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_Units -/
def P_C_Units.toPoset (x : P_C_Units) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_C_UpperSets -/
def P_C_UpperSets.toPoset (x : P_C_UpperSets) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_Decimal -/
def P_Decimal.toPoset (x : P_Decimal) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_Bounded -/
def P_F_Bounded.toPoset (x : P_F_Bounded) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_C_Intersection -/
def P_F_C_Intersection.toPoset (x : P_F_C_Intersection) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_C_Union -/
def P_F_C_Union.toPoset (x : P_F_C_Union) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_Interval -/
def P_F_Interval.toPoset (x : P_F_Interval) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_LowerClosure -/
def P_F_LowerClosure.toPoset (x : P_F_LowerClosure) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_Subposet -/
def P_F_Subposet.toPoset (x : P_F_Subposet) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_F_UpperClosure -/
def P_F_UpperClosure.toPoset (x : P_F_UpperClosure) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_Finite -/
def P_Finite.toPoset (x : P_Finite) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_Float -/
def P_Float.toPoset (x : P_Float) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_Fractions -/
def P_Fractions.toPoset (x : P_Fractions) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_Integer -/
def P_Integer.toPoset (x : P_Integer) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Poset fields from P_Unknown -/
def P_Unknown.toPoset (x : P_Unknown) : PosetFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Root fields from Poset -/
def PosetFields.toRoot (x : PosetFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract Root fields from Query -/
def QueryFields.toRoot (x : QueryFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract QueryData fields from QueryFixFunMinReqData -/
def QueryFixFunMinReqData.toQueryData (x : QueryFixFunMinReqData) : QueryDataFields :=
  {
    type := x.type
  }

/-- Extract QueryData fields from QueryFixReqMaxFunData -/
def QueryFixReqMaxFunData.toQueryData (x : QueryFixReqMaxFunData) : QueryDataFields :=
  {
    type := x.type
  }

/-- Extract Query fields from Query_Single -/
def Query_Single.toQuery (x : Query_Single) : QueryFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Check fields from SL1Check -/
def SL1Check.toCheck (x : SL1Check) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from SL1Map -/
def SL1MapFields.toRoot (x : SL1MapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract SL1Map fields from SL1_C_CodSum -/
def SL1_C_CodSum.toSL1Map (x : SL1_C_CodSum) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_CodSumSmash -/
def SL1_C_CodSumSmash.toSL1Map (x : SL1_C_CodSumSmash) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_ExplicitApprox -/
def SL1_C_ExplicitApprox.toSL1Map (x : SL1_C_ExplicitApprox) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_Intersection -/
def SL1_C_Intersection.toSL1Map (x : SL1_C_Intersection) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_Parallel -/
def SL1_C_Parallel.toSL1Map (x : SL1_C_Parallel) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_ProdIntersection -/
def SL1_C_ProdIntersection.toSL1Map (x : SL1_C_ProdIntersection) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_Product -/
def SL1_C_Product.toSL1Map (x : SL1_C_Product) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_RefineDomain -/
def SL1_C_RefineDomain.toSL1Map (x : SL1_C_RefineDomain) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_Series -/
def SL1_C_Series.toSL1Map (x : SL1_C_Series) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_Trace -/
def SL1_C_Trace.toSL1Map (x : SL1_C_Trace) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_Union -/
def SL1_C_Union.toSL1Map (x : SL1_C_Union) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_C_WrapUnits -/
def SL1_C_WrapUnits.toSL1Map (x : SL1_C_WrapUnits) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_Exact -/
def SL1_Exact.toSL1Map (x : SL1_Exact) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_Identity -/
def SL1_Identity.toSL1Map (x : SL1_Identity) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_InvMultiply -/
def SL1_InvMultiply.toSL1Map (x : SL1_InvMultiply) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_InvSum -/
def SL1_InvSum.toSL1Map (x : SL1_InvSum) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SL1Map fields from SL1_Unknown -/
def SL1_Unknown.toSL1Map (x : SL1_Unknown) : SL1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract Check fields from SLCheck -/
def SLCheck.toCheck (x : SLCheck) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from SLMap -/
def SLMapFields.toRoot (x : SLMapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract SLMap fields from SL_C_ITransform -/
def SL_C_ITransform.toSLMap (x : SL_C_ITransform) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_Intersection -/
def SL_C_Intersection.toSLMap (x : SL_C_Intersection) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_Parallel -/
def SL_C_Parallel.toSLMap (x : SL_C_Parallel) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_RefineDomain -/
def SL_C_RefineDomain.toSLMap (x : SL_C_RefineDomain) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_Series -/
def SL_C_Series.toSLMap (x : SL_C_Series) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_Trace -/
def SL_C_Trace.toSLMap (x : SL_C_Trace) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_Union -/
def SL_C_Union.toSLMap (x : SL_C_Union) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_C_WrapUnits -/
def SL_C_WrapUnits.toSLMap (x : SL_C_WrapUnits) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_Identity -/
def SL_Identity.toSLMap (x : SL_Identity) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_L_Exact -/
def SL_L_Exact.toSLMap (x : SL_L_Exact) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_L_Explicit_Approx -/
def SL_L_Explicit_Approx.toSLMap (x : SL_L_Explicit_Approx) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_L_Lift1_Constant -/
def SL_L_Lift1_Constant.toSLMap (x : SL_L_Lift1_Constant) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_L_Lift1_Transform -/
def SL_L_Lift1_Transform.toSLMap (x : SL_L_Lift1_Transform) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SLMap fields from SL_Unknown -/
def SL_Unknown.toSLMap (x : SL_Unknown) : SLMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract Check fields from SU1Check -/
def SU1Check.toCheck (x : SU1Check) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from SU1Map -/
def SU1MapFields.toRoot (x : SU1MapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract SU1Map fields from SU1_C_CodSum -/
def SU1_C_CodSum.toSU1Map (x : SU1_C_CodSum) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_CodSumSmash -/
def SU1_C_CodSumSmash.toSU1Map (x : SU1_C_CodSumSmash) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_ExplicitApprox -/
def SU1_C_ExplicitApprox.toSU1Map (x : SU1_C_ExplicitApprox) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_Intersection -/
def SU1_C_Intersection.toSU1Map (x : SU1_C_Intersection) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_Parallel -/
def SU1_C_Parallel.toSU1Map (x : SU1_C_Parallel) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_ProdIntersection -/
def SU1_C_ProdIntersection.toSU1Map (x : SU1_C_ProdIntersection) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_Product -/
def SU1_C_Product.toSU1Map (x : SU1_C_Product) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_RefineDomain -/
def SU1_C_RefineDomain.toSU1Map (x : SU1_C_RefineDomain) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_Series -/
def SU1_C_Series.toSU1Map (x : SU1_C_Series) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_Trace -/
def SU1_C_Trace.toSU1Map (x : SU1_C_Trace) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_Union -/
def SU1_C_Union.toSU1Map (x : SU1_C_Union) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_C_WrapUnits -/
def SU1_C_WrapUnits.toSU1Map (x : SU1_C_WrapUnits) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_Exact -/
def SU1_Exact.toSU1Map (x : SU1_Exact) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_Identity -/
def SU1_Identity.toSU1Map (x : SU1_Identity) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_InvMultiply -/
def SU1_InvMultiply.toSU1Map (x : SU1_InvMultiply) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_InvSum -/
def SU1_InvSum.toSU1Map (x : SU1_InvSum) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SU1Map fields from SU1_Unknown -/
def SU1_Unknown.toSU1Map (x : SU1_Unknown) : SU1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract Check fields from SUCheck -/
def SUCheck.toCheck (x : SUCheck) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from SUMap -/
def SUMapFields.toRoot (x : SUMapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract SUMap fields from SU_C_ITransform -/
def SU_C_ITransform.toSUMap (x : SU_C_ITransform) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_Intersection -/
def SU_C_Intersection.toSUMap (x : SU_C_Intersection) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_Parallel -/
def SU_C_Parallel.toSUMap (x : SU_C_Parallel) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_RefineDomain -/
def SU_C_RefineDomain.toSUMap (x : SU_C_RefineDomain) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_Series -/
def SU_C_Series.toSUMap (x : SU_C_Series) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_Trace -/
def SU_C_Trace.toSUMap (x : SU_C_Trace) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_Union -/
def SU_C_Union.toSUMap (x : SU_C_Union) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_C_WrapUnits -/
def SU_C_WrapUnits.toSUMap (x : SU_C_WrapUnits) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_Identity -/
def SU_Identity.toSUMap (x : SU_Identity) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_L_Exact -/
def SU_L_Exact.toSUMap (x : SU_L_Exact) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_L_Explicit_Approx -/
def SU_L_Explicit_Approx.toSUMap (x : SU_L_Explicit_Approx) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_L_Lift1_Constant -/
def SU_L_Lift1_Constant.toSUMap (x : SU_L_Lift1_Constant) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_L_Lift1_Transform -/
def SU_L_Lift1_Transform.toSUMap (x : SU_L_Lift1_Transform) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract SUMap fields from SU_Unknown -/
def SU_Unknown.toSUMap (x : SU_Unknown) : SUMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    opt := x.opt,
    pes := x.pes,
    type := x.type
  }

/-- Extract Check fields from U1Check -/
def U1Check.toCheck (x : U1Check) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from U1Map -/
def U1MapFields.toRoot (x : U1MapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract U1Map fields from U1_C_CodSum -/
def U1_C_CodSum.toU1Map (x : U1_C_CodSum) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_CodSumSmash -/
def U1_C_CodSumSmash.toU1Map (x : U1_C_CodSumSmash) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_DomUnion -/
def U1_C_DomUnion.toU1Map (x : U1_C_DomUnion) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_Intersection -/
def U1_C_Intersection.toU1Map (x : U1_C_Intersection) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_Parallel -/
def U1_C_Parallel.toU1Map (x : U1_C_Parallel) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_ProdIntersection -/
def U1_C_ProdIntersection.toU1Map (x : U1_C_ProdIntersection) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_Product -/
def U1_C_Product.toU1Map (x : U1_C_Product) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_RefineDomain -/
def U1_C_RefineDomain.toU1Map (x : U1_C_RefineDomain) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_Series -/
def U1_C_Series.toU1Map (x : U1_C_Series) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_Trace -/
def U1_C_Trace.toU1Map (x : U1_C_Trace) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_Union -/
def U1_C_Union.toU1Map (x : U1_C_Union) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_C_WrapUnits -/
def U1_C_WrapUnits.toU1Map (x : U1_C_WrapUnits) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Catalog -/
def U1_Catalog.toU1Map (x : U1_Catalog) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Constant -/
def U1_Constant.toU1Map (x : U1_Constant) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Entire -/
def U1_Entire.toU1Map (x : U1_Entire) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Explicit -/
def U1_Explicit.toU1Map (x : U1_Explicit) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_FromFilter -/
def U1_FromFilter.toU1Map (x : U1_FromFilter) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Identity -/
def U1_Identity.toU1Map (x : U1_Identity) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_IntersectionOfPrinUpperSets -/
def U1_IntersectionOfPrinUpperSets.toU1Map (x : U1_IntersectionOfPrinUpperSets) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_InvMul_Opt -/
def U1_InvMul_Opt.toU1Map (x : U1_InvMul_Opt) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_InvMul_Pes -/
def U1_InvMul_Pes.toU1Map (x : U1_InvMul_Pes) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_InvSum_Opt -/
def U1_InvSum_Opt.toU1Map (x : U1_InvSum_Opt) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_InvSum_Pes -/
def U1_InvSum_Pes.toU1Map (x : U1_InvSum_Pes) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_L_Uinv -/
def U1_L_Uinv.toU1Map (x : U1_L_Uinv) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Lift -/
def U1_Lift.toU1Map (x : U1_Lift) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_RepresentPrincipalUpperSet -/
def U1_RepresentPrincipalUpperSet.toU1Map (x : U1_RepresentPrincipalUpperSet) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Uinv_Join -/
def U1_Uinv_Join.toU1Map (x : U1_Uinv_Join) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Uinv_JoinConstant -/
def U1_Uinv_JoinConstant.toU1Map (x : U1_Uinv_JoinConstant) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_UnionOfPrinUpperSets -/
def U1_UnionOfPrinUpperSets.toU1Map (x : U1_UnionOfPrinUpperSets) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract U1Map fields from U1_Unknown -/
def U1_Unknown.toU1Map (x : U1_Unknown) : U1MapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    type := x.type
  }

/-- Extract Check fields from UCheck -/
def UCheck.toCheck (x : UCheck) : CheckFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    type := x.type
  }

/-- Extract Root fields from UMap -/
def UMapFields.toRoot (x : UMapFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

/-- Extract UMap fields from U_C_ITransform -/
def U_C_ITransform.toUMap (x : U_C_ITransform) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_Intersection -/
def U_C_Intersection.toUMap (x : U_C_Intersection) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_Parallel -/
def U_C_Parallel.toUMap (x : U_C_Parallel) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_RefineDomain -/
def U_C_RefineDomain.toUMap (x : U_C_RefineDomain) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_Series -/
def U_C_Series.toUMap (x : U_C_Series) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_Trace -/
def U_C_Trace.toUMap (x : U_C_Trace) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_Union -/
def U_C_Union.toUMap (x : U_C_Union) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_C_WrapUnits -/
def U_C_WrapUnits.toUMap (x : U_C_WrapUnits) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_Catalog -/
def U_Catalog.toUMap (x : U_Catalog) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_Constant -/
def U_Constant.toUMap (x : U_Constant) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_Identity -/
def U_Identity.toUMap (x : U_Identity) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_L_Lift1_Constant -/
def U_L_Lift1_Constant.toUMap (x : U_L_Lift1_Constant) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_L_Lift1_Transform -/
def U_L_Lift1_Transform.toUMap (x : U_L_Lift1_Transform) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract UMap fields from U_Unknown -/
def U_Unknown.toUMap (x : U_Unknown) : UMapFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    kcod := x.kcod,
    kdom := x.kdom,
    kimp := x.kimp,
    type := x.type
  }

/-- Extract Unit fields from Unit_None -/
def Unit_None.toUnit (x : Unit_None) : UnitFields :=
  {
    description := x.description,
    kind := x.kind,
    type := x.type
  }

/-- Extract Unit fields from Unit_Single -/
def Unit_Single.toUnit (x : Unit_Single) : UnitFields :=
  {
    description := x.description,
    kind := x.kind,
    type := x.type
  }

/-- Extract Unit fields from Unit_Vector -/
def Unit_Vector.toUnit (x : Unit_Vector) : UnitFields :=
  {
    description := x.description,
    kind := x.kind,
    type := x.type
  }

/-- Extract Unit fields from Unit_Wrapped -/
def Unit_Wrapped.toUnit (x : Unit_Wrapped) : UnitFields :=
  {
    description := x.description,
    kind := x.kind,
    type := x.type
  }

/-- Extract UpperSet fields from UpperSet_Unused -/
def UpperSet_Unused.toUpperSet (x : UpperSet_Unused) : UpperSetFields :=
  {
    kind := x.kind,
    type := x.type
  }

/-- Extract UpperSet fields from UpperSet_UpperClosure -/
def UpperSet_UpperClosure.toUpperSet (x : UpperSet_UpperClosure) : UpperSetFields :=
  {
    kind := x.kind,
    type := x.type
  }

/-- Extract Value fields from VU -/
def VU.toValue (x : VU) : ValueFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version,
    address := x.address,
    type := x.type
  }

/-- Extract Root fields from Value -/
def ValueFields.toRoot (x : ValueFields) : RootFields :=
  {
    description := x.description,
    hash := x.hash,
    kind := x.kind,
    version := x.version
  }

end Format2 -- namespace

temp.lean

def interpret (P : Format2.Poset) : Except InterpretError HPoset.Poset :=
  match P with
  | .P_Bool s => return .P_Bool s.description
  | .P_Integer s => return .P_Integer s.description
  | .P_Unknown s => return .P_Unknown s.description
  | .P_Float s => return .P_Float s.description

  | .P_C_Product s => do
      let ps <- s.subs.mapM interpret
      return .P_C_Product s.description ps
  | .P_C_Sum s => do
    let ps <- s.subs.mapM interpret
    let arr := ps.toArray
    let n := arr.size
    if  n ≥ 1 then
      return .P_C_Sum s.description ps
    else
      .error (.GeneralError "Sum must have at least one component")

  | .P_F_UpperClosure s => do
      let ambient <- interpret s.poset
      return .P_F_UpperClosure s.description ambient
  | .P_F_LowerClosure s => do
      let ambient <- interpret s.poset
      return .P_F_LowerClosure s.description ambient
  | .P_F_Interval s =>  do
      let ambient <- interpret s.poset
      return .P_F_Interval s.description ambient s.low s.high
  | .P_F_C_Union s => do
      let ps <- s.subs.mapM interpret
      let ambient <- interpret s.ambient
      return .P_F_C_Union s.description ambient ps
  | .P_F_C_Intersection s => do
      let ps <- s.subs.mapM interpret
      let ambient <- interpret s.ambient
      return .P_F_C_Intersection s.description ambient ps

  | .P_F_Bounded s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_Decimal s =>  return .P_Decimal s.description
  | .P_Fractions s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_Finite s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_F_Subposet s =>  Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_UpperSets s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_Units s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_Twisted s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_SumSmash s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_ProductSmash s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_ProductDS s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_Power s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_Opposite s => do
    let sub <- interpret s.poset
    return .P_C_Opposite s.description sub
  | .P_C_Multisets s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_LowerSets s => do
    let sub <- interpret s.poset
    return .P_C_LowerSets s.description sub
  | .P_C_Lexicographic s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_Discretized s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
  | .P_C_Arrow s => Except.error (InterpretError.NotImplementedError s!"Poset not supported: {repr s.type}")
termination_by sizeOf P
decreasing_by
  all_goals simp_wf
  -- all_goals (

  --   -- Second try: this is for a single poset field
  --   try (
  --        have : sizeOf s.poset < 1+ sizeOf s := sorry;  -- Lemma: poset field is smaller than structure
  --        exact this)
  --   -- Third try: this is for ambient field
  --   try (
  --        have : sizeOf s.ambient < 1+sizeOf s := sorry;  -- Lemma: ambient field is smaller
  --        exact this)
  -- )
  next => -- P_C_Product
    rename_i  x h;
    have h1 : sizeOf x < sizeOf s.subs := List.sizeOf_lt_of_mem h;
     have h2 : sizeOf s.subs < 1 + sizeOf s := by
       simp_wf
       sorry

    have h3: sizeOf x < 1 + sizeOf s := by
      linarith
    exact h3
  next => sorry
  next => --  Format2.P_F_UpperClosure
      have : sizeOf s.poset < 1 + sizeOf s :=  by
        simp_wf  -- Lemma: poset field is smaller than structure
        sorry
      exact this
  next => sorry
  next => sorry
  next => sorry
  next => sorry
  next => sorry
  next => sorry
  next => sorry
  next => sorry